Programming Languages Suite

home *** CD-ROM | disk | FTP | other *** search

/ Programming Languages Suite / ProgLangD.iso / Foxpro 2.6 {Windows} / WZ_QFORM.AP_ / WZ_QFORM.bin

(.txt)

Wrap

MS Visual FoxPro App | 1994-03-10 | 385KB | 5,154 lines

WIZARDS\WIZBMPS WIZARDS\WIZBMPS wizbmp WIZARDS\WIZBMPS WZIBUTTONSISVAREA STMPDBF STMPNAME ATEMPARR MKDIR WZ_ALERT WZATEXT WIZBMP SFNAME FXSETTYPE scxcode common setup setup setup setup READACT() READDEAC() common cleanup print cleanup text2btn cleanup pict2btn cleanup textbutton cleanup pictbutton cleanup p_refresh cleanup t_refresh cleanup general nogeneral multi_edit d_mdlogs w_mdlogs d_dlogs w_dlogs WIZARDS\WIZBMPS\ @*BHN ISVDBF LHASGEN SCXCODE WZ_SCXCODEWZ_NEWWIZ OBJTYPE WZIBUTTONSDEACTIVATEDESC SNIPPET SETUPCODE XCODESETUPTYPE WZIEDITTYPWZLNOSKIP WZTBLARR WZ_FIELDS ACTIVTYPE DEACTTYPE ACTIVATE PROCCODE PROCTYPE WZBMPPATH JUSTFNAME PICTURE WZSSAVEFIL EMBOSSED wz_newwiz& wz_newwiz& WINDOWS ms sans serif ms sans serif geneva geneva EMBOSSED WZTMPARR WZTMPCURS WZ_SPECS OBJTYPE DEPENRED PLATFORM SFONTFACE EFONTSIZE PICTURE FONTSTYLE OBJCODE WZ_NEWWIZ MAKE_XPLAT QFORM wizpix AUTOFORMF WZSPARM1 WZSPARM2 WZSPARM3 CHKSRC WZ_SPECS BWZSSAVEFILWZIACTION WZIBUTTONSWZIEDITTYPREPOMAIN WIZPIX MVCNT WZLNOSCRN WZPROCESS MODIFY RUNFORM STMPPJ LHASRUNPRGIFHANDLE WZ_SPECS WZ_FIELDS WZ_SCRNS LWZ_SORT WZ_STFARR WZ_STSARR WZITOPBTN WZIBACKBTNWZINEXTBTNWZIENDBTN WZIOUT WZICANBTN WZ_STITLE WZLALLFLDSWZIBUTTONSWZIEDITTYPWZIACTION WZLNOTASK ADDTASK WZATASKS WZSSAVEFILJUSTPATH WZATEXT wizqfrmd.dbf wizqfrm1.dbf WIZPIX use &dbfname DBFNAME WZPROCESS REPODBF USE_IT PLATFORM UNIQUEID TIMESTAMP OBJTYPE OBJCODE HEIGHT WIDTH STYLE PICTURE ORDER UNIQUE COMMENT ENVIRON BOXCHAR FILLCHAR PENRED PENGREEN PENBLUE FILLRED FILLGREEN FILLBLUE PENSIZE PENPAT FILLPAT FONTFACE FONTSTYLE FONTSIZE RULER RULERLINES GRIDV GRIDH SCHEME SCHEME2 COLORPAIR LOTYPE RANGELO HITYPE RANGEHI WHENTYPE VALIDTYPE VALID ERRORTYPE ERROR MESSTYPE MESSAGE SHOWTYPE ACTIVTYPE ACTIVATE DEACTTYPE DEACTIVATE PROCTYPE PROCCODE SETUPTYPE SETUPCODE FLOAT CLOSE MINIMIZE BORDER SHADOW CENTER REFRESH DISABLED SCROLLBAR ADDALIAS INITIALVAL INITIALNUM SPACING CURPOS WINDOWS _QE30Y8YVJ 474579015 1 63 0.000 0.000 29.615 83.333 1 T 17 -1 -1 -1 192 192 192 16 1 8 30T1212 1 1 1 1 0 181 1 TTT1 T T T WINDOWS _QEC145SW0 443979142 2 1 19 T 20 WINDOWS _QE30YC4N1 443705105 5 0 23 0.385 4.000 1.000 5.700 22 -1 -1 -1 -1 -1 -1 21 1 14 1 0.000 WINDOWS _QE30YCJ0C 444100024 6 2.692 0.000 0.154 83.333 1 24 -1 -1 -1 -1 -1 -1 2 8 0 0 WINDOWS _QE310RLPL 44403281917 0 25 14.769 12.000 8.385 22.167 1 26 0 2 TT WINDOWS _QE5114T0H 443705028 5 0 28 0.385 29.000 1.000 15.200 128 0 128 0 0 255 27 3 14 1 0.000 WINDOWS _QE5116J24 444032845 7 4 9.308 10.000 14.769 56.16712 -1 -1 -1 -1 -1 -1 1 8 0 0 WINDOWS _QE5116N3E 443705043 5 0 30 7.769 10.000 1.000 15.900 -1 -1 -1 -1 -1 -1 29 3 14 1 0.000 WINDOWS _QEB17DO5T 444100028 6 25.769 0.000 0.154 83.333 1 31 -1 -1 -1 -1 -1 -1 2 8 0 0 WINDOWS _QE90UKWAO 44377346315 0 32 3.769 4.333 1.000 15.333 34 33 C -1 -1 -1 255 255 255 35 3 8 1 1 1 1 1 1 1 FFF F 0 WINDOWS _QE3120O9Q 44410000715 1 36 3.769 22.333 1.000 25.600 38 37 C 0 0 0 255 255 255 39 0 8 0 1 1 0 401 1 1 FFF F 0 WINDOWS _QE90UMBTD 44377348315 0 41 5.615 4.333 1.000 15.333 43 42 C -1 -1 -1 255 255 255 44 1 8 1 1 1 1 1 1 1 FFF F 0 WINDOWS _QE311ZVLZ 44410001115 2 45 10.231 12.333 5.000 55.000 47 46 C 0 0 0 255 255 255 48 0 8 0 1 1 0 491 1 1 FFT F 0 WINDOWS _QE50U8DU9 44410001620 1 51 14.769 36.000 8.385 22.167 53 52 -1 -1 -1 -1 -1 -1 50 1 8 0 0 541 1 F 0.667 WINDOWS _QE310QBJ7 44410002014 1 55 17.615 60.000 1.308 5.400 58 56 0 0 0 255 255 255 57 0 8 1 0 591 1 F 0 WINDOWS _QEC144R6M 44397911615 0 60 5.615 42.000 1.000 15.333 62 61 C -1 -1 -1 255 255 255 63 1 8 1 1 1 1 1 1 1 FFF F 0 WINDOWS _QJD0LA38B 45688353412 1 65 26.923 1.667 1.769 7.833 67 66 -1 -1 -1 -1 -1 -1 64 1 8 0 1 1 1 0 68 0 69 F 70 1 0.667 WINDOWS _QJD0LD4DB 45688352412 1 72 26.923 9.667 1.769 7.833 74 73 -1 -1 -1 -1 -1 -1 71 1 8 0 1 1 1 0 75 0 76 F 77 1 0.667 WINDOWS _QJD0LDNBZ 45688352812 1 79 26.923 17.667 1.769 7.833 81 80 -1 -1 -1 -1 -1 -1 78 1 8 0 1 1 1 0 82 0 83 F 84 1 0.667 WINDOWS _QJD0LE3M8 45688350812 1 86 26.923 25.667 1.769 7.833 88 87 -1 -1 -1 -1 -1 -1 85 1 8 0 1 1 1 0 89 0 90 F 91 1 0.667 WINDOWS _QJD0LFIJC 45688350312 1 93 26.923 33.667 1.769 7.833 95 94 -1 -1 -1 -1 -1 -1 92 1 8 0 1 1 1 0 96 0 97 F 98 1 0.667 WINDOWS _QJD0LFYWL 45688354212 1 100 26.923 41.667 1.769 7.833 102 101 -1 -1 -1 -1 -1 -1 99 1 8 0 1 1 1 0 103 0 104 F 105 1 0.667 WINDOWS _QJD0LGDO7 45688354912 1 107 26.923 49.667 1.769 7.833 109 108 -1 -1 -1 -1 -1 -1 106 1 8 0 1 1 1 0 110 0 111 F 112 1 0.667 WINDOWS _QJD0LGTKA 45688355612 1 114 26.923 57.667 1.769 7.833 116 115 -1 -1 -1 -1 -1 -1 113 1 8 0 1 1 1 0 117 0 118 F 119 1 0.667 WINDOWS _QJD0LH85A 45688332512 1 121 26.923 65.667 1.769 7.833 123 122 -1 -1 -1 -1 -1 -1 120 1 8 0 1 1 1 0 124 0 125 F 126 1 0.667 WINDOWS _QJD0LHS6B 45688330112 1 128 26.923 73.667 1.769 7.833 130 129 -1 -1 -1 -1 -1 -1 127 1 8 0 1 1 1 0 131 0 132 F 133 1 0.667 WINDOWS _QJE01A68N 45688348812 1 135 26.769 6.333 2.077 4.500 137 136 -1 -1 -1 -1 -1 -1 134 1 8 0 1 1 1 0 139 0 140 F 141 1 0.667 WINDOWS _QJE01HGDQ 45688347912 1 143 26.769 12.333 2.077 4.500 145 144 -1 -1 -1 -1 -1 -1 142 1 8 0 1 1 1 0 147 0 148 F 149 1 0.667 WINDOWS _QJE01HLCA 45688349512 1 151 26.769 18.333 2.077 4.500 153 152 -1 -1 -1 -1 -1 -1 150 1 8 0 1 1 1 0 155 0 156 F 157 1 0.667 WINDOWS _QJE01KORE 45688347112 1 159 26.769 24.333 2.077 4.500 161 160 -1 -1 -1 -1 -1 -1 158 1 8 0 1 1 1 0 163 0 164 F 165 1 0.667 WINDOWS _QJE01KRM5 45688346512 1 167 26.769 30.333 2.077 4.500 169 168 -1 -1 -1 -1 -1 -1 166 1 8 0 1 1 1 0 171 0 172 F 173 1 0.667 WINDOWS _QJE01MCET 45688345212 1 175 26.769 36.333 2.077 4.500 177 176 -1 -1 -1 -1 -1 -1 174 1 8 0 1 1 1 0 179 0 180 F 181 1 0.667 WINDOWS _QJE01MF0L 45688344312 1 183 26.769 42.333 2.077 4.500 185 184 -1 -1 -1 -1 -1 -1 182 1 8 0 1 1 1 0 187 0 188 F 189 1 0.667 WINDOWS _QJE01OQW7 45688343812 1 191 26.769 48.333 2.077 4.500 193 192 -1 -1 -1 -1 -1 -1 190 1 8 0 1 1 1 0 195 0 196 F 197 1 0.667 WINDOWS _QJE01OT6U 45688343312 1 199 26.769 54.333 2.077 4.500 201 200 -1 -1 -1 -1 -1 -1 198 1 8 0 1 1 1 0 203 0 204 F 205 1 0.667 WINDOWS _QJE01Q3XA 45688342912 1 207 26.769 60.333 2.077 4.500 209 208 -1 -1 -1 -1 -1 -1 206 1 8 0 1 1 1 0 211 0 212 F 213 1 0.667 WINDOWS _QJE01QCUS 45688342512 1 215 26.769 66.333 2.077 4.500 217 216 -1 -1 -1 -1 -1 -1 214 1 8 0 1 1 1 0 219 0 220 F 221 1 0.667 WINDOWS _QJE01QJ1F 45688341912 1 223 26.769 72.333 2.077 4.500 225 224 -1 -1 -1 -1 -1 -1 222 1 8 0 1 1 1 0 227 0 228 F 229 1 0.667 WINDOWS _QN60N465U 47404758914 1 230 0.923 70.000 1.308 11.667 233 231 -1 -1 -1 -1 -1 -1 232 1 8 1 1 0 234 1 F 0 WINDOWS _QK71D9AIZ 45847125710 0 15.000 10.000 WINDOWS _QJL0XSY7T 45688365610 0 16.000 12.000 WINDOWS 23 13.000 6.000 11.000 12.000 2 0 235 1 8 WINDOWS 23 24.000 10.000 19.000 20.000 5 0 236 1 14 WINDOWS 23 24.000 10.000 19.000 20.000 5 0 237 3 14 WINDOWS 23 13.000 6.000 11.000 12.000 2 0 238 3 8 WINDOWS 23 13.000 5.000 11.000 11.000 2 0 239 0 8 MS Sans Serif "Screen Name" readdeac() ..\OFFICES.DBF Offices MS Sans Serif wzheader title "TITLE" wzheader standard wzgenfld MS Sans Serif "Standard Style " MS Sans Serif "Default Objects:" wzfooter label1 wzlabel1 : MS Sans Serif field wzfield MS Sans Serif isediting label2 wzlabel2 MS Sans Serif standard wzmemofld) MS Sans Serif isediting MS Sans Serif m.wzdummy wzgeninv "@*IHN " isediting m.wzckdummy wzcbox MS Sans Serif "@*C " isediting column2 column2 MS Sans Serif MS Sans Serif m.top_btn wzfooter txtbutton "@*HN \<Top" btn_val('TOP') 'Go to first record.' "Top" MS Sans Serif m.prev_btn wzfooter txtbutton "@*HN \<Prev" btn_val('PREV') 'Go to previous record.' "Prev" MS Sans Serif m.next_btn wzfooter txtbutton "@*HN \<Next" btn_val('NEXT') 'Go to next record.' "Next" MS Sans Serif m.end_btn wzfooter txtbutton "@*HN \<End" btn_val('END') 'Go to last record.' "End" MS Sans Serif m.loc_btn wzfooter txtbutton "@*HN \<Locate" btn_val('LOCATE') 'Locate a record.' "Locate" MS Sans Serif m.add_btn wzfooter txtbutton "@*HN \<Add" btn_val('ADD') 'Add a new record.' "Add" MS Sans Serif m.edit_btn wzfooter txtbutton "@*HN Ed\<it" btn_val('EDIT') 'Edit current record.' "Edit" MS Sans Serif m.del_btn wzfooter txtbutton "@*HN \<Delete" btn_val('DELETE') 'Delete current record.' "Delete" MS Sans Serif m.prnt_btn wzfooter txtbutton "@*HN P\<rint" btn_val('PRINT') 'Print report.' "Print" MS Sans Serif m.exit_btn wzfooter txtbutton "@*HN \<Close" btn_val('EXIT') 'Close screen.' "Close" MS Sans Serif m.top_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZTOP.BMP" btn_val('TOP') 'Go to first record.' MS Sans Serif m.prev_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZBACK.BMP" btn_val('PREV') 'Go to previous record.' MS Sans Serif m.loc_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZLOCATE.BMP" btn_val('LOCATE') 'Locate a record.' MS Sans Serif m.next_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZNEXT.BMP" btn_val('NEXT') 'Go to next record.' MS Sans Serif m.end_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZEND.BMP" btn_val('END') 'Go to last record.' MS Sans Serif m.add_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZNEW.BMP" btn_val('ADD') 'Add a new record.' MS Sans Serif m.edit_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZEDIT.BMP" btn_val('EDIT') 'Edit current record.' MS Sans Serif m.del_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZDELETE.BMP" btn_val('DELETE') 'Delete current record.' MS Sans Serif m.save_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZSAVE.BMP" btn_val('SAVE') 'Save edits.' MS Sans Serif m.can_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZUNDO.BMP" btn_val('CANCEL') 'Cancel edits.' MS Sans Serif m.prnt_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZPRINT.BMP" btn_val('PRINT') 'Print report.' MS Sans Serif m.exit_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZCLOSE.BMP" btn_val('EXIT') 'Close screen.' find_drop findcbox MS Sans Serif) "@*C \<Find..." findval() MS Sans Serif MS Sans Serif MS Sans Serif MS Sans Serif MS Sans Serif PLATFORM UNIQUEID TIMESTAMP OBJTYPE OBJCODE HEIGHT WIDTH STYLE PICTURE ORDER UNIQUE COMMENT ENVIRON BOXCHAR FILLCHAR PENRED PENGREEN PENBLUE FILLRED FILLGREEN FILLBLUE PENSIZE PENPAT FILLPAT FONTFACE FONTSTYLE FONTSIZE RULER RULERLINES GRIDV GRIDH SCHEME SCHEME2 COLORPAIR LOTYPE RANGELO HITYPE RANGEHI WHENTYPE VALIDTYPE VALID ERRORTYPE ERROR MESSTYPE MESSAGE SHOWTYPE ACTIVTYPE ACTIVATE DEACTTYPE DEACTIVATE PROCTYPE PROCCODE SETUPTYPE SETUPCODE FLOAT CLOSE MINIMIZE BORDER SHADOW CENTER REFRESH DISABLED SCROLLBAR ADDALIAS INITIALVAL INITIALNUM SPACING CURPOS WINDOWS _QE30Y8YVJ 474579061 1 63 0.000 0.000 29.615 83.333 1 T 17 -1 -1 -1 192 192 192 16 1 8 30T1212 1 1 1 1 0 181 1 19TTT1 T T T WINDOWS _QEC146QUM 443979164 2 1 20 T 21 WINDOWS _QE9109RZI 444661946 6 5.385 22.500 0.154 21.333 1 22 255 255 255 255 255 255 2 8 0 0 WINDOWS _QE9109C6J 444661940 6 5.308 22.500 0.154 21.333 1 24 128 128 128 128 128 128 2 8 0 0 WINDOWS _QE915UWU1 443784541 6 2.308 13.167 0.462 0.167 0 26 255 255 255 255 255 255 1 8 0 0 WINDOWS _QE9163NQZ 443908646 6 2.462 4.667 0.154 8.500 1 27 255 255 255 255 255 255 2 8 0 0 WINDOWS _QE915UEYZ 443908637 6 2.308 4.500 0.077 8.833 1 28 -1 -1 -1 -1 -1 -1 1 8 0 0 WINDOWS _QE30YC4N1 443817357 5 0 31 0.385 4.000 1.000 5.700 30 -1 -1 -1 -1 -1 -1 29 1 14 1 0.000 WINDOWS _QE30YCJ0C 444100041 6 3.077 0.000 0.077 83.333 1 32 -1 -1 -1 -1 -1 -1 1 8 0 0 WINDOWS _QE5114T0H 443921060 5 0 34 0.385 30.000 1.000 15.100 128 0 128 0 0 255 33 3 14 1 0.000 WINDOWS _QE5116J24 443705049 7 4 10.231 16.000 13.846 58.16712 -1 -1 -1 -1 -1 -1 1 8 0 0 WINDOWS _QE5116N3E 443705043 5 0 36 8.692 16.000 1.000 15.900 -1 -1 -1 -1 -1 -1 35 3 14 1 0.000 WINDOWS _QE910J1XT 444661912 6 5.385 22.500 0.154 0.167 0 37 -1 -1 -1 -1 -1 -1 1 8 0 0 WINDOWS _QE914MVDF 444661917 6 5.308 43.833 0.231 0.167 0 39 255 255 255 255 255 255 1 8 0 0 WINDOWS _QE915UKN8 443784537 6 2.308 4.333 0.462 0.167 0 41 -1 -1 -1 -1 -1 -1 1 8 0 0 WINDOWS _QE915V1ZD 443908654 6 2.692 4.500 0.077 8.833 1 42 255 255 255 255 255 255 1 8 0 0 WINDOWS _QEB1BUX29 444100068 6 25.846 0.000 0.077 83.333 1 43 -1 -1 -1 -1 -1 -1 1 8 0 0 WINDOWS _QE90UKWAO 44377346315 0 44 4.077 4.333 1.000 15.333 46 45 C -1 -1 -1 255 255 255 47 1 8 1 1 1 1 1 1 1 FFF F 0 WINDOWS _QE3120O9Q 44410004515 1 48 4.077 22.500 1.000 25.600 50 49 C 0 0 0 192 192 192 51 0 8 0 1 1 0 521 1 1 FFF F 0 WINDOWS _QE90UMBTD 44377348315 0 53 6.154 4.333 1.000 15.333 55 54 C -1 -1 -1 255 255 255 56 1 8 1 1 1 1 1 1 1 FFF F 0 WINDOWS _QEC146U2C 44397916915 0 57 6.154 42.000 1.000 15.333 59 58 C -1 -1 -1 255 255 255 60 1 8 1 1 1 1 1 1 1 FFF F 0 WINDOWS _QED0RTOYG 44403285817 0 61 15.385 18.833 8.385 22.167 1 62 0 2 TT WINDOWS _QED0RTOYJ 44410005115 2 63 10.846 19.167 5.000 56.400 65 64 C 0 0 0 255 255 255 66 0 8 0 1 1 0 671 1 1 FFT F 0 WINDOWS _QED0RTOYM 44410005920 1 69 15.385 42.833 8.385 22.167 71 70 -1 -1 -1 -1 -1 -1 68 1 8 0 0 721 1 F 0.667 WINDOWS _QED0RTOYP 44410006514 1 73 18.231 66.833 1.308 5.400 76 74 0 0 0 255 255 255 75 0 8 1 0 771 1 F 0 WINDOWS _QJE01A68N 45688348812 1 79 26.769 6.333 2.077 4.500 81 80 -1 -1 -1 -1 -1 -1 78 1 8 0 1 1 1 0 83 0 84 F 85 1 0.667 WINDOWS _QJE01HGDQ 45688347912 1 87 26.769 12.333 2.077 4.500 89 88 -1 -1 -1 -1 -1 -1 86 1 8 0 1 1 1 0 91 0 92 F 93 1 0.667 WINDOWS _QJE01HLCA 45688349512 1 95 26.769 18.333 2.077 4.500 97 96 -1 -1 -1 -1 -1 -1 94 1 8 0 1 1 1 0 99 0 100 F 101 1 0.667 WINDOWS _QJE01KORE 45688347112 1 103 26.769 24.333 2.077 4.500 105 104 -1 -1 -1 -1 -1 -1 102 1 8 0 1 1 1 0 107 0 108 F 109 1 0.667 WINDOWS _QJE01KRM5 45688346512 1 111 26.769 30.333 2.077 4.500 113 112 -1 -1 -1 -1 -1 -1 110 1 8 0 1 1 1 0 115 0 116 F 117 1 0.667 WINDOWS _QJE01MCET 45688345212 1 119 26.769 36.333 2.077 4.500 121 120 -1 -1 -1 -1 -1 -1 118 1 8 0 1 1 1 0 123 0 124 F 125 1 0.667 WINDOWS _QJE01MF0L 45688344312 1 127 26.769 42.333 2.077 4.500 129 128 -1 -1 -1 -1 -1 -1 126 1 8 0 1 1 1 0 131 0 132 F 133 1 0.667 WINDOWS _QJE01OQW7 45688343812 1 135 26.769 48.333 2.077 4.500 137 136 -1 -1 -1 -1 -1 -1 134 1 8 0 1 1 1 0 139 0 140 F 141 1 0.667 WINDOWS _QJE01OT6U 45688343312 1 143 26.769 54.333 2.077 4.500 145 144 -1 -1 -1 -1 -1 -1 142 1 8 0 1 1 1 0 147 0 148 F 149 1 0.667 WINDOWS _QJE01Q3XA 45688342912 1 151 26.769 60.333 2.077 4.500 153 152 -1 -1 -1 -1 -1 -1 150 1 8 0 1 1 1 0 155 0 156 F 157 1 0.667 WINDOWS _QJE01QCUS 45688342512 1 159 26.769 66.333 2.077 4.500 161 160 -1 -1 -1 -1 -1 -1 158 1 8 0 1 1 1 0 163 0 164 F 165 1 0.667 WINDOWS _QJE01QJ1F 45688341912 1 167 26.769 72.333 2.077 4.500 169 168 -1 -1 -1 -1 -1 -1 166 1 8 0 1 1 1 0 171 0 172 F 173 1 0.667 WINDOWS _QJD0LA38B 45688353412 1 175 26.923 2.000 1.769 7.833 177 176 -1 -1 -1 -1 -1 -1 174 1 8 0 1 1 1 0 178 0 179 F 180 1 0.667 WINDOWS _QJD0LD4DB 45688352412 1 182 26.923 10.000 1.769 7.833 184 183 -1 -1 -1 -1 -1 -1 181 1 8 0 1 1 1 0 185 0 186 F 187 1 0.667 WINDOWS _QJD0LDNBZ 45688352812 1 189 26.923 18.000 1.769 7.833 191 190 -1 -1 -1 -1 -1 -1 188 1 8 0 1 1 1 0 192 0 193 F 194 1 0.667 WINDOWS _QJD0LE3M8 45688350812 1 196 26.923 26.000 1.769 7.833 198 197 -1 -1 -1 -1 -1 -1 195 1 8 0 1 1 1 0 199 0 200 F 201 1 0.667 WINDOWS _QJD0LFIJC 45688350312 1 203 26.923 34.000 1.769 7.833 205 204 -1 -1 -1 -1 -1 -1 202 1 8 0 1 1 1 0 206 0 207 F 208 1 0.667 WINDOWS _QJD0LFYWL 45688354212 1 210 26.923 42.000 1.769 7.833 212 211 -1 -1 -1 -1 -1 -1 209 1 8 0 1 1 1 0 213 0 214 F 215 1 0.667 WINDOWS _QJD0LGDO7 45688354912 1 217 26.923 50.000 1.769 7.833 219 218 -1 -1 -1 -1 -1 -1 216 1 8 0 1 1 1 0 220 0 221 F 222 1 0.667 WINDOWS _QJD0LGTKA 45688355612 1 224 26.923 58.000 1.769 7.833 226 225 -1 -1 -1 -1 -1 -1 223 1 8 0 1 1 1 0 227 0 228 F 229 1 0.667 WINDOWS _QJD0LH85A 45688332512 1 231 26.923 66.000 1.769 7.833 233 232 -1 -1 -1 -1 -1 -1 230 1 8 0 1 1 1 0 234 0 235 F 236 1 0.667 WINDOWS _QJD0LHS6B 45688330112 1 238 26.923 74.000 1.769 7.667 240 239 -1 -1 -1 -1 -1 -1 237 1 8 0 1 1 1 0 241 0 242 F 243 1 0.667 WINDOWS _QN60N5RX0 47404759814 1 244 0.923 70.000 1.308 11.667 247 245 -1 -1 -1 -1 -1 -1 246 1 8 1 1 0 248 1 F 0 WINDOWS _QJL0XUWC5 45688370310 0 24.000 12.000 WINDOWS _QK71DA23Y 45847127710 0 25.000 10.000 WINDOWS 23 13.000 6.000 11.000 12.000 2 0 249 1 8 WINDOWS 23 24.000 10.000 19.000 20.000 5 0 250 1 14 WINDOWS 23 24.000 10.000 19.000 20.000 5 0 251 3 14 WINDOWS 23 13.000 5.000 11.000 11.000 2 0 252 0 8 MS Sans Serif "Screen Name" readdeac() SET READBORDER OFF ..\OFFICES.DBF Offices wzfx hstretch skipgen skiplogic wzfx hstretch skipgen skiplogic wzheadfx float wzheadfx hstretch wzheadfx hstretch MS Sans Serif wzheader title "TITLE" wzheader MS Sans Serif "Chiseled Style " MS Sans Serif "Default Objects:" wzfx fix skipgen skiplogic wzfx float skipgen skiplogic wzheadfx fix wzheadfx hstretch wzfooter label1 wzlabel1 : MS Sans Serif field wzfield MS Sans Serif isediting label2 wzlabel2 MS Sans Serif column2 column2 MS Sans Serif standard wzgenfld standard wzmemofld MS Sans Serif isediting MS Sans Serif m.wzdummy wzgeninv "@*IHN " isediting m.wzckdummy wzcbox MS Sans Serif "@*C " isediting MS Sans Serif m.top_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZTOP.BMP" btn_val('TOP') 'Go to first record.' MS Sans Serif m.prev_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZBACK.BMP" btn_val('PREV') 'Go to previous record.' MS Sans Serif m.loc_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZLOCATE.BMP" btn_val('LOCATE') 'Locate a record.' MS Sans Serif m.next_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZNEXT.BMP" btn_val('NEXT') 'Go to next record.' MS Sans Serif m.end_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZEND.BMP" btn_val('END') 'Go to last record.' MS Sans Serif m.add_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZNEW.BMP" btn_val('ADD') 'Add a new record.' MS Sans Serif m.edit_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZEDIT.BMP" btn_val('EDIT') 'Edit current record.' MS Sans Serif m.del_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZDELETE.BMP" btn_val('DELETE') 'Delete current record.' MS Sans Serif m.save_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZSAVE.BMP" btn_val('SAVE') 'Save edits.' MS Sans Serif m.can_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZUNDO.BMP" btn_val('CANCEL') 'Cancel edits.' MS Sans Serif m.prnt_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZPRINT.BMP" btn_val('PRINT') 'Print report.' MS Sans Serif m.exit_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZCLOSE.BMP" btn_val('EXIT') 'Close screen.' MS Sans Serif m.top_btn wzfooter txtbutton "@*HN \<Top" btn_val('TOP') 'Go to first record.' "Top" MS Sans Serif m.prev_btn wzfooter txtbutton "@*HN \<Prev" btn_val('PREV') 'Go to previous record.' "Prev" MS Sans Serif m.next_btn wzfooter txtbutton "@*HN \<Next" btn_val('NEXT') 'Go to next record.' "Next" MS Sans Serif m.end_btn wzfooter txtbutton "@*HN \<End" btn_val('END') 'Go to last record.' "End" MS Sans Serif m.loc_btn wzfooter txtbutton "@*HN \<Locate" btn_val('LOCATE') 'Locate a record.' "Locate" MS Sans Serif m.add_btn wzfooter txtbutton "@*HN \<Add" btn_val('ADD') 'Add a new record.' "Add" MS Sans Serif m.edit_btn wzfooter txtbutton "@*HN Ed\<it" btn_val('EDIT') 'Edit current record.' "Edit" MS Sans Serif m.del_btn wzfooter txtbutton "@*HN \<Delete" btn_val('DELETE') 'Delete current record.' "Delete" MS Sans Serif m.prnt_btn wzfooter txtbutton "@*HN P\<rint" btn_val('PRINT') 'Print report.' "Print" MS Sans Serif m.exit_btn wzfooter txtbutton "@*HN \<Close" btn_val('EXIT') 'Close screen.' "Close" find_drop findcbox MS Sans Serif "@*C \<Find..." findval() MS Sans Serif MS Sans Serif MS Sans Serif MS Sans Serif PLATFORM UNIQUEID TIMESTAMP OBJTYPE OBJCODE HEIGHT WIDTH STYLE PICTURE ORDER UNIQUE COMMENT ENVIRON BOXCHAR FILLCHAR PENRED PENGREEN PENBLUE FILLRED FILLGREEN FILLBLUE PENSIZE PENPAT FILLPAT FONTFACE FONTSTYLE FONTSIZE RULER RULERLINES GRIDV GRIDH SCHEME SCHEME2 COLORPAIR LOTYPE RANGELO HITYPE RANGEHI WHENTYPE VALIDTYPE VALID ERRORTYPE ERROR MESSTYPE MESSAGE SHOWTYPE ACTIVTYPE ACTIVATE DEACTTYPE DEACTIVATE PROCTYPE PROCCODE SETUPTYPE SETUPCODE FLOAT CLOSE MINIMIZE BORDER SHADOW CENTER REFRESH DISABLED SCROLLBAR ADDALIAS INITIALVAL INITIALNUM SPACING CURPOS WINDOWS _QE30Y8YVJ 474579078 1 63 0.000 0.000 29.615 83.333 1 T 17 -1 -1 -1 192 192 192 16 1 8 30T1212 1 1 1 1 0 181 1 TTT1 T T T WINDOWS _QEC14875K 443979202 2 1 19 T 20 WINDOWS _QEA02C3TK 443908678 7 4 4.000 22.833 1.077 22.167 0 21 128 128 128 128 128 128 1 8 1 0 WINDOWS _QE30YC4N1 443705105 5 0 24 0.385 4.000 1.000 5.700 23 -1 -1 -1 -1 -1 -1 22 1 14 1 0.000 WINDOWS _QE30YCJ0C 444100098 6 2.615 0.000 0.308 83.333 1 25 -1 -1 -1 -1 -1 -1 4 8 0 0 WINDOWS _QE5114T0H 443812433 5 0 27 0.385 30.000 1.000 14.400 128 0 128 0 0 255 26 3 14 1 0.000 WINDOWS _QE5116J24 443705049 7 4 10.154 14.000 13.846 62.16712 -1 -1 -1 -1 -1 -1 1 8 0 0 WINDOWS _QE5116N3E 443705043 5 0 29 8.692 14.000 1.000 15.900 -1 -1 -1 -1 -1 -1 28 3 14 1 0.000 WINDOWS _QE90UKWAO 44377346315 0 30 3.769 4.333 1.000 15.333 32 31 C -1 -1 -1 255 255 255 33 1 8 1 1 1 1 1 1 1 FFF F 0 WINDOWS _QE3120O9Q 44410009115 1 34 3.769 22.500 1.000 25.600 36 35 C 0 0 0 255 255 255 37 0 8 0 1 1 0 381 1 1 FFF F 0 WINDOWS _QE90UMBTD 44377348315 0 39 5.615 4.333 1.000 15.333 41 40 C -1 -1 -1 255 255 255 42 1 8 1 1 1 1 1 1 1 FFF F 0 WINDOWS _QEB1BXYC2 444100100 6 25.692 0.000 0.308 83.333 1 43 -1 -1 -1 -1 -1 -1 4 8 0 0 WINDOWS _QEC148ADX 44397920415 0 44 5.615 42.000 1.000 15.333 46 45 C -1 -1 -1 255 255 255 47 1 8 1 1 1 1 1 1 1 FFF F 0 WINDOWS _QED0RUGPB 44403287817 0 48 15.154 20.000 8.385 22.167 1 49 0 2 TT WINDOWS _QED0RUGPE 44410008715 2 50 10.615 20.333 5.000 55.000 52 51 C 0 0 0 255 255 255 53 0 8 0 1 1 0 541 1 1 FFT F 0 WINDOWS _QED0RUGPH 44410008320 1 56 15.154 44.000 8.385 22.167 58 57 -1 -1 -1 -1 -1 -1 55 1 8 0 0 591 1 F 0.667 WINDOWS _QED0RUGPK 44410007914 1 60 18.000 68.000 1.308 5.400 63 61 0 0 0 255 255 255 62 0 8 1 0 641 1 F 0 WINDOWS _QJE01A68N 45688348812 1 66 26.769 6.333 2.077 4.500 68 67 -1 -1 -1 -1 -1 -1 65 1 8 0 1 1 1 0 70 0 71 F 72 1 0.667 WINDOWS _QJE01HGDQ 45688347912 1 74 26.769 12.333 2.077 4.500 76 75 -1 -1 -1 -1 -1 -1 73 1 8 0 1 1 1 0 78 0 79 F 80 1 0.667 WINDOWS _QJE01HLCA 45688349512 1 82 26.769 18.333 2.077 4.500 84 83 -1 -1 -1 -1 -1 -1 81 1 8 0 1 1 1 0 86 0 87 F 88 1 0.667 WINDOWS _QJE01KORE 45688347112 1 90 26.769 24.333 2.077 4.500 92 91 -1 -1 -1 -1 -1 -1 89 1 8 0 1 1 1 0 94 0 95 F 96 1 0.667 WINDOWS _QJE01KRM5 45688346512 1 98 26.769 30.333 2.077 4.500 100 99 -1 -1 -1 -1 -1 -1 97 1 8 0 1 1 1 0 102 0 103 F 104 1 0.667 WINDOWS _QJE01MCET 45688345212 1 106 26.769 36.333 2.077 4.500 108 107 -1 -1 -1 -1 -1 -1 105 1 8 0 1 1 1 0 110 0 111 F 112 1 0.667 WINDOWS _QJE01MF0L 45688344312 1 114 26.769 42.333 2.077 4.500 116 115 -1 -1 -1 -1 -1 -1 113 1 8 0 1 1 1 0 118 0 119 F 120 1 0.667 WINDOWS _QJE01OQW7 45688343812 1 122 26.769 48.333 2.077 4.500 124 123 -1 -1 -1 -1 -1 -1 121 1 8 0 1 1 1 0 126 0 127 F 128 1 0.667 WINDOWS _QJE01OT6U 45688343312 1 130 26.769 54.333 2.077 4.500 132 131 -1 -1 -1 -1 -1 -1 129 1 8 0 1 1 1 0 134 0 135 F 136 1 0.667 WINDOWS _QJE01Q3XA 45688342912 1 138 26.769 60.333 2.077 4.500 140 139 -1 -1 -1 -1 -1 -1 137 1 8 0 1 1 1 0 142 0 143 F 144 1 0.667 WINDOWS _QJE01QCUS 45688342512 1 146 26.769 66.333 2.077 4.500 148 147 -1 -1 -1 -1 -1 -1 145 1 8 0 1 1 1 0 150 0 151 F 152 1 0.667 WINDOWS _QJE01QJ1F 45688341912 1 154 26.769 72.333 2.077 4.500 156 155 -1 -1 -1 -1 -1 -1 153 1 8 0 1 1 1 0 158 0 159 F 160 1 0.667 WINDOWS _QJD0LA38B 45688353412 1 162 26.923 2.000 1.769 7.833 164 163 -1 -1 -1 -1 -1 -1 161 1 8 0 1 1 1 0 165 0 166 F 167 1 0.667 WINDOWS _QJD0LD4DB 45688352412 1 169 26.923 10.000 1.769 7.833 171 170 -1 -1 -1 -1 -1 -1 168 1 8 0 1 1 1 0 172 0 173 F 174 1 0.667 WINDOWS _QJD0LDNBZ 45688352812 1 176 26.923 18.000 1.769 7.833 178 177 -1 -1 -1 -1 -1 -1 175 1 8 0 1 1 1 0 179 0 180 F 181 1 0.667 WINDOWS _QJD0LE3M8 45688350812 1 183 26.923 26.000 1.769 7.833 185 184 -1 -1 -1 -1 -1 -1 182 1 8 0 1 1 1 0 186 0 187 F 188 1 0.667 WINDOWS _QJD0LFIJC 45688350312 1 190 26.923 34.000 1.769 7.833 192 191 -1 -1 -1 -1 -1 -1 189 1 8 0 1 1 1 0 193 0 194 F 195 1 0.667 WINDOWS _QJD0LFYWL 45688354212 1 197 26.923 42.000 1.769 7.833 199 198 -1 -1 -1 -1 -1 -1 196 1 8 0 1 1 1 0 200 0 201 F 202 1 0.667 WINDOWS _QJD0LGDO7 45688354912 1 204 26.923 50.000 1.769 7.833 206 205 -1 -1 -1 -1 -1 -1 203 1 8 0 1 1 1 0 207 0 208 F 209 1 0.667 WINDOWS _QJD0LGTKA 45688355612 1 211 26.923 58.000 1.769 7.833 213 212 -1 -1 -1 -1 -1 -1 210 1 8 0 1 1 1 0 214 0 215 F 216 1 0.667 WINDOWS _QJD0LH85A 45688332512 1 218 26.923 66.000 1.769 7.833 220 219 -1 -1 -1 -1 -1 -1 217 1 8 0 1 1 1 0 221 0 222 F 223 1 0.667 WINDOWS _QJD0LHS6B 45688330112 1 225 26.923 74.000 1.769 7.667 227 226 -1 -1 -1 -1 -1 -1 224 1 8 0 1 1 1 0 228 0 229 F 230 1 0.667 WINDOWS _QN60N6AIX 47404761014 1 231 0.923 70.000 1.308 11.667 234 232 -1 -1 -1 -1 -1 -1 233 1 8 1 1 0 235 1 F 0 WINDOWS _QNF0P5Z48 474635669 7 4 12.923 8.000 8.538 22.500 0 236 -1 -1 -1 -1 -1 -1 1 8 0 0 WINDOWS _QJL0XVZXE 45688373110 0 16.000 12.000 WINDOWS _QK71DBBL8 45847143710 0 17.000 10.000 WINDOWS 23 13.000 6.000 11.000 12.000 2 0 237 1 8 WINDOWS 23 24.000 10.000 19.000 20.000 5 0 238 1 14 WINDOWS 23 24.000 10.000 19.000 20.000 5 0 239 3 14 WINDOWS 23 13.000 5.000 11.000 11.000 2 0 240 0 8 MS Sans Serif "Screen Name" readdeac() ..\OFFICES.DBF Offices wzprefx hstretch vstretch MS Sans Serif wzheader title "TITLE" wzheader MS Sans Serif "Shadow Style " MS Sans Serif "Default Objects:" label1 wzlabel1 : MS Sans Serif field wzfield MS Sans Serif isediting label2 wzlabel2 MS Sans Serif wzfooter column2 column2 MS Sans Serif standard wzgenfld standard wzmemofld MS Sans Serif isediting MS Sans Serif m.wzdummy wzgeninv "@*IHN " isediting m.wzckdummy wzcbox MS Sans Serif "@*C " isediting MS Sans Serif m.top_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZTOP.BMP" btn_val('TOP') 'Go to first record.' MS Sans Serif m.prev_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZBACK.BMP" btn_val('PREV') 'Go to previous record.' MS Sans Serif m.loc_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZLOCATE.BMP" btn_val('LOCATE') 'Locate a record.' MS Sans Serif m.next_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZNEXT.BMP" btn_val('NEXT') 'Go to next record.' MS Sans Serif m.end_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZEND.BMP" btn_val('END') 'Go to last record.' MS Sans Serif m.add_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZNEW.BMP" btn_val('ADD') 'Add a new record.' MS Sans Serif m.edit_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZEDIT.BMP" btn_val('EDIT') 'Edit current record.' MS Sans Serif m.del_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZDELETE.BMP" btn_val('DELETE') 'Delete current record.' MS Sans Serif m.save_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZSAVE.BMP" btn_val('SAVE') 'Save edits.' MS Sans Serif m.can_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZUNDO.BMP" btn_val('CANCEL') 'Cancel edits.' MS Sans Serif m.prnt_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZPRINT.BMP" btn_val('PRINT') 'Print report.' MS Sans Serif m.exit_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZCLOSE.BMP" btn_val('EXIT') 'Close screen.' MS Sans Serif m.top_btn wzfooter txtbutton "@*HN \<Top" btn_val('TOP') 'Go to first record.' "Top" MS Sans Serif m.prev_btn wzfooter txtbutton "@*HN \<Prev" btn_val('PREV') 'Go to previous record.' "Prev" MS Sans Serif m.next_btn wzfooter txtbutton "@*HN \<Next" btn_val('NEXT') 'Go to next record.' "Next" MS Sans Serif m.end_btn wzfooter txtbutton "@*HN \<End" btn_val('END') 'Go to last record.' "End" MS Sans Serif m.loc_btn wzfooter txtbutton "@*HN \<Locate" btn_val('LOCATE') 'Locate a record.' "Locate" MS Sans Serif m.add_btn wzfooter txtbutton "@*HN \<Add" btn_val('ADD') 'Add a new record.' "Add" MS Sans Serif m.edit_btn wzfooter txtbutton "@*HN Ed\<it" btn_val('EDIT') 'Edit current record.' "Edit" MS Sans Serif m.del_btn wzfooter txtbutton "@*HN \<Delete" btn_val('DELETE') 'Delete current record.' "Delete" MS Sans Serif m.prnt_btn wzfooter txtbutton "@*HN P\<rint" btn_val('PRINT') 'Print report.' "Print" MS Sans Serif m.exit_btn wzfooter txtbutton "@*HN \<Close" btn_val('EXIT') 'Close screen.' "Close" find_drop findcboxwwww MS Sans Serif "@*C \<Find..." findval() wzgenborder MS Sans Serif MS Sans Serif MS Sans Serif MS Sans Serif PLATFORM UNIQUEID TIMESTAMP OBJTYPE OBJCODE HEIGHT WIDTH STYLE PICTURE ORDER UNIQUE COMMENT ENVIRON BOXCHAR FILLCHAR PENRED PENGREEN PENBLUE FILLRED FILLGREEN FILLBLUE PENSIZE PENPAT FILLPAT FONTFACE FONTSTYLE FONTSIZE RULER RULERLINES GRIDV GRIDH SCHEME SCHEME2 COLORPAIR LOTYPE RANGELO HITYPE RANGEHI WHENTYPE VALIDTYPE VALID ERRORTYPE ERROR MESSTYPE MESSAGE SHOWTYPE ACTIVTYPE ACTIVATE DEACTTYPE DEACTIVATE PROCTYPE PROCCODE SETUPTYPE SETUPCODE FLOAT CLOSE MINIMIZE BORDER SHADOW CENTER REFRESH DISABLED SCROLLBAR ADDALIAS INITIALVAL INITIALNUM SPACING CURPOS WINDOWS _QE30Y8YVJ 474579095 1 63 0.000 0.000 29.615 83.333 1 T 17 -1 -1 -1 192 192 192 16 1 8 30T1212 1 1 1 1 0 181 1 19TTT1 T T T WINDOWS _QEC14A8BJ 443979252 2 1 20 F 21 WINDOWS _QG81C68YJ 448639893 7 4 25.846 0.000 1.000 1.667 0 22 192 192 192 -1 -1 -1 1 8 0 1 WINDOWS _QEB1C0HXF 444100131 7 4 26.769 0.167 2.846 83.167 0 23 0 0 128 0 0 128 1 8 1 0 WINDOWS _QEA0LCE5Z 443908693 7 4 3.692 4.000 2.231 22.167 0 24 0 0 0 255 255 255 1 8 1 0 WINDOWS _QEA0L6AK3 443829980 7 4 0.000 0.167 2.846 83.167 0 26 0 0 128 0 0 128 1 8 1 0 WINDOWS _QE30YC4N1 443705105 5 0 29 0.385 4.000 1.000 5.700 28 192 192 192 192 192 192 27 1 14 1 0.000 WINDOWS _QE5114T0H 443829934 5 0 31 0.385 30.000 1.000 12.900 128 0 128 0 0 255 30 3 14 1 0.000 WINDOWS _QE5116J24 443705049 7 4 10.231 14.000 13.846 64.16712 -1 -1 -1 -1 -1 -1 1 8 0 0 WINDOWS _QE5116N3E 443705043 5 0 33 8.692 14.000 1.000 15.900 -1 -1 -1 -1 -1 -1 32 3 14 1 0.000 WINDOWS _QE90UKWAO 44383305115 0 34 3.769 4.333 1.000 18.400 35 C 0 0 255 255 255 255 36 0 8 1 1 1 1 1 1 1 FFF F 0 WINDOWS _QE3120O9Q 44410011215 1 37 4.846 4.333 1.000 21.333 39 38 C 0 0 0 255 255 255 40 1 8 0 1 1 0 411 1 1 FFF F 0 WINDOWS _QE90UMBTD 44377348315 0 42 5.923 4.333 1.000 15.333 44 43 C -1 -1 -1 255 255 255 45 1 8 1 1 1 1 1 1 1 FFF F 0 WINDOWS _QEC14AC0O 44397925415 0 46 5.923 44.500 1.000 15.333 48 47 C -1 -1 -1 255 255 255 49 1 8 1 1 1 1 1 1 1 FFF F 0 WINDOWS _QED0RV3L3 44403423417 0 50 15.231 18.333 8.385 22.167 1 51 0 2 TT WINDOWS _QED0RV3L6 44410011615 2 52 10.231 18.333 5.000 45.400 54 53 C 0 0 0 255 255 255 55 0 8 0 1 1 0 561 1 1 FFT F 0 WINDOWS _QED0RV3L9 44410012120 1 58 15.231 42.333 8.385 22.167 60 59 -1 -1 -1 -1 -1 -1 57 1 8 0 0 611 1 F 0.667 WINDOWS _QED0RV3LD 44410012514 1 62 18.077 66.333 1.308 5.400 65 63 0 0 0 255 255 255 64 0 8 1 0 661 1 F 0 WINDOWS _QJE01A68N 45688348812 1 68 27.231 6.333 2.077 4.500 70 69 -1 -1 -1 -1 -1 -1 67 1 8 0 1 1 1 0 72 0 73 F 74 1 0.667 WINDOWS _QJE01HGDQ 45688347912 1 76 27.231 12.333 2.077 4.500 78 77 -1 -1 -1 -1 -1 -1 75 1 8 0 1 1 1 0 80 0 81 F 82 1 0.667 WINDOWS _QJE01HLCA 45688349512 1 84 27.231 18.333 2.077 4.500 86 85 -1 -1 -1 -1 -1 -1 83 1 8 0 1 1 1 0 88 0 89 F 90 1 0.667 WINDOWS _QJE01KORE 45688347112 1 92 27.231 24.333 2.077 4.500 94 93 -1 -1 -1 -1 -1 -1 91 1 8 0 1 1 1 0 96 0 97 F 98 1 0.667 WINDOWS _QJE01KRM5 45688346512 1 100 27.231 30.333 2.077 4.500 102 101 -1 -1 -1 -1 -1 -1 99 1 8 0 1 1 1 0 104 0 105 F 106 1 0.667 WINDOWS _QJE01MCET 45688345212 1 108 27.231 36.333 2.077 4.500 110 109 -1 -1 -1 -1 -1 -1 107 1 8 0 1 1 1 0 112 0 113 F 114 1 0.667 WINDOWS _QJE01MF0L 45688344312 1 116 27.231 42.333 2.077 4.500 118 117 -1 -1 -1 -1 -1 -1 115 1 8 0 1 1 1 0 120 0 121 F 122 1 0.667 WINDOWS _QJE01OQW7 45688343812 1 124 27.231 48.333 2.077 4.500 126 125 -1 -1 -1 -1 -1 -1 123 1 8 0 1 1 1 0 128 0 129 F 130 1 0.667 WINDOWS _QJE01OT6U 45688343312 1 132 27.231 54.333 2.077 4.500 134 133 -1 -1 -1 -1 -1 -1 131 1 8 0 1 1 1 0 136 0 137 F 138 1 0.667 WINDOWS _QJE01Q3XA 45688342912 1 140 27.231 60.333 2.077 4.500 142 141 -1 -1 -1 -1 -1 -1 139 1 8 0 1 1 1 0 144 0 145 F 146 1 0.667 WINDOWS _QJE01QCUS 45688342512 1 148 27.231 66.333 2.077 4.500 150 149 -1 -1 -1 -1 -1 -1 147 1 8 0 1 1 1 0 152 0 153 F 154 1 0.667 WINDOWS _QJE01QJ1F 45688341912 1 156 27.231 72.333 2.077 4.500 158 157 -1 -1 -1 -1 -1 -1 155 1 8 0 1 1 1 0 160 0 161 F 162 1 0.667 WINDOWS _QJD0LA38B 45688353412 1 164 27.385 2.000 1.769 7.833 166 165 -1 -1 -1 -1 -1 -1 163 1 8 0 1 1 1 0 167 0 168 F 169 1 0.667 WINDOWS _QJD0LD4DB 45688352412 1 171 27.385 10.000 1.769 7.833 173 172 -1 -1 -1 -1 -1 -1 170 1 8 0 1 1 1 0 174 0 175 F 176 1 0.667 WINDOWS _QJD0LDNBZ 45688352812 1 178 27.385 18.000 1.769 7.833 180 179 -1 -1 -1 -1 -1 -1 177 1 8 0 1 1 1 0 181 0 182 F 183 1 0.667 WINDOWS _QJD0LE3M8 45688350812 1 185 27.385 26.000 1.769 7.833 187 186 -1 -1 -1 -1 -1 -1 184 1 8 0 1 1 1 0 188 0 189 F 190 1 0.667 WINDOWS _QJD0LFIJC 45688350312 1 192 27.385 34.000 1.769 7.833 194 193 -1 -1 -1 -1 -1 -1 191 1 8 0 1 1 1 0 195 0 196 F 197 1 0.667 WINDOWS _QJD0LFYWL 45688354212 1 199 27.385 42.000 1.769 7.833 201 200 -1 -1 -1 -1 -1 -1 198 1 8 0 1 1 1 0 202 0 203 F 204 1 0.667 WINDOWS _QJD0LGDO7 45688354912 1 206 27.385 50.000 1.769 7.833 208 207 -1 -1 -1 -1 -1 -1 205 1 8 0 1 1 1 0 209 0 210 F 211 1 0.667 WINDOWS _QJD0LGTKA 45688355612 1 213 27.385 58.000 1.769 7.833 215 214 -1 -1 -1 -1 -1 -1 212 1 8 0 1 1 1 0 216 0 217 F 218 1 0.667 WINDOWS _QJD0LH85A 45688332512 1 220 27.385 66.000 1.769 7.833 222 221 -1 -1 -1 -1 -1 -1 219 1 8 0 1 1 1 0 223 0 224 F 225 1 0.667 WINDOWS _QJD0LHS6B 45688330112 1 227 27.385 74.000 1.769 7.667 229 228 -1 -1 -1 -1 -1 -1 226 1 8 0 1 1 1 0 230 0 231 F 232 1 0.667 WINDOWS _QN60N6U6N 47404762214 1 233 0.923 70.000 1.308 11.667 236 234 0 0 0 -1 -1 -1 235 1 8 1 1 0 237 1 F 0 WINDOWS _QJL0XXNCU 45688377110 0 17.000 12.000 WINDOWS _QK71DCOEV 45847147010 0 18.000 10.000 WINDOWS 23 13.000 6.000 11.000 12.000 2 0 238 1 8 WINDOWS 23 24.000 10.000 19.000 20.000 5 0 239 1 14 WINDOWS 23 24.000 10.000 19.000 20.000 5 0 240 3 14 WINDOWS 23 13.000 5.000 11.000 11.000 2 0 241 0 8 MS Sans Serif "Screen Name" readdeac() SET READBORDER OFF ..\OFFICES.DBF Offices wzfooter wzfooter "wzprefx hstretch vstretch tietolbl wzheader MS Sans Serif wzheader title "TITLE" MS Sans Serif "Boxed Style " MS Sans Serif "Default Objects:" label1 wzlabel1 : postfld MS Sans Serif field wzfield nooff MS Sans Serif isediting label2 wzlabel2 MS Sans Serif column2 column2 MS Sans Serif standard wzgenfld nooff standard wzmemofld nooff MS Sans Serif isediting MS Sans Serif m.wzdummy wzgeninv nooff "@*IHN " isediting m.wzckdummy wzcbox nooff MS Sans Serif "@*C " isediting MS Sans Serif m.top_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZTOP.BMP" btn_val('TOP') 'Go to first record.' MS Sans Serif m.prev_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZBACK.BMP" btn_val('PREV') 'Go to previous record.' MS Sans Serif m.loc_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZLOCATE.BMP" btn_val('LOCATE') 'Locate a record.' MS Sans Serif m.next_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZNEXT.BMP" btn_val('NEXT') 'Go to next record.' MS Sans Serif m.end_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZEND.BMP" btn_val('END') 'Go to last record.' MS Sans Serif m.add_btn2 wzfooter picbutton "@*BHN ..\WIZBMPS\WZNEW.BMP" btn_val('ADD') 'Add a new record.' MS Sans Serif m.edit_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZEDIT.BMP" btn_val('EDIT') 'Edit current record.' MS Sans Serif m.del_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZDELETE.BMP" btn_val('DELETE') 'Delete current record.' MS Sans Serif m.save_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZSAVE.BMP" btn_val('SAVE') 'Save edits.' MS Sans Serif m.can_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZUNDO.BMP" btn_val('CANCEL') 'Cancel edits.' MS Sans Serif m.prnt_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZPRINT.BMP" btn_val('PRINT') 'Print report.' MS Sans Serif m.exit_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZCLOSE.BMP" btn_val('EXIT') 'Close screen.' MS Sans Serif m.top_btn wzfooter txtbutton "@*HN \<Top" btn_val('TOP') 'Go to first record.' "Top" MS Sans Serif m.prev_btn wzfooter txtbutton "@*HN \<Prev" btn_val('PREV') 'Go to previous record.' "Prev" MS Sans Serif m.next_btn wzfooter txtbutton "@*HN \<Next" btn_val('NEXT') 'Go to next record.' "Next" MS Sans Serif m.end_btn wzfooter txtbutton "@*HN \<End" btn_val('END') 'Go to last record.' "End" MS Sans Serif m.loc_btn wzfooter txtbutton "@*HN \<Locate" btn_val('LOCATE') 'Locate a record.' "Locate" MS Sans Serif m.add_btn wzfooter txtbutton "@*HN \<Add" btn_val('ADD') 'Add a new record.' "Add" MS Sans Serif m.edit_btn wzfooter txtbutton "@*HN Ed\<it" btn_val('EDIT') 'Edit current record.' "Edit" MS Sans Serif m.del_btn wzfooter txtbutton "@*HN \<Delete" btn_val('DELETE') 'Delete current record.' "Delete" MS Sans Serif m.prnt_btn wzfooter txtbutton "@*HN P\<rint" btn_val('PRINT') 'Print report.' "Print" MS Sans Serif m.exit_btn wzfooter txtbutton "@*HN \<Close" btn_val('EXIT') 'Close screen.' "Close"wwwww find_drop findcbox MS Sans Serif "@*C \<Find..." findval() MS Sans Serif MS Sans Serif MS Sans Serif MS Sans Serif PLATFORM UNIQUEID TIMESTAMP OBJTYPE OBJCODE HEIGHT WIDTH STYLE PICTURE ORDER UNIQUE COMMENT ENVIRON BOXCHAR FILLCHAR PENRED PENGREEN PENBLUE FILLRED FILLGREEN FILLBLUE PENSIZE PENPAT FILLPAT FONTFACE FONTSTYLE FONTSIZE RULER RULERLINES GRIDV GRIDH SCHEME SCHEME2 COLORPAIR LOTYPE RANGELO HITYPE RANGEHI WHENTYPE VALIDTYPE VALID ERRORTYPE ERROR MESSTYPE MESSAGE SHOWTYPE ACTIVTYPE ACTIVATE DEACTTYPE DEACTIVATE PROCTYPE PROCCODE SETUPTYPE SETUPCODE FLOAT CLOSE MINIMIZE BORDER SHADOW CENTER REFRESH DISABLED SCROLLBAR ADDALIAS INITIALVAL INITIALNUM SPACING CURPOS WINDOWS _QE30Y8YVJ 474579113 1 63 0.000 0.000 29.615 83.333 1 T 17 -1 -1 -1 0 128 128 16 1 8 30T1212 1 1 1 1 0 181 1 TTT1 T T T WINDOWS _QEC143NY6 443979089 2 1 19 T 20 WINDOWS _QEB1CHIQO 443921577 5 0 23 0.538 4.500 1.000 5.700 22 192 192 192 192 192 192 21 1 14 1 0.000 WINDOWS _QE30YC4N1 443817357 5 0 26 0.385 4.000 1.000 5.700 25 -1 -1 -1 -1 -1 -1 24 1 14 1 0.000 WINDOWS _QE30YCJ0C 444100146 6 3.077 0.000 0.077 83.333 1 27 -1 -1 -1 -1 -1 -1 1 8 0 0 WINDOWS _QE5114T0H 443921551 5 0 29 0.385 30.000 1.000 16.800 128 0 128 0 0 255 28 3 14 1 0.000 WINDOWS _QE5116J24 443705049 7 4 10.231 16.000 13.846 58.16712 -1 -1 -1 -1 -1 -1 1 8 0 0 WINDOWS _QE5116N3E 443705043 5 0 31 8.692 16.000 1.000 15.900 -1 -1 -1 -1 -1 -1 30 3 14 1 0.000 WINDOWS _QE90UKWAO 44377346315 0 32 4.077 4.333 1.000 15.333 34 33 C -1 -1 -1 255 255 255 35 1 8 1 1 1 1 1 1 1 FFF F 0 WINDOWS _QE3120O9Q 45858830415 1 36 4.077 22.500 1.000 25.600 38 37 C 0 0 0 255 255 255 39 0 8 0 1 1 0 401 1 1 FFF F 0 WINDOWS _QE90UMBTD 44377348315 0 41 6.154 4.333 1.000 15.333 43 42 C -1 -1 -1 255 255 255 44 1 8 1 1 1 1 1 1 1 FFF F 0 WINDOWS _QEB1BUX29 443921021 6 25.846 0.000 0.077 83.333 1 45 -1 -1 -1 -1 -1 -1 1 8 0 0 WINDOWS _QEB1CK1Q5 460489711 6 3.923 22.000 0.077 22.333 1 46 128 128 128 128 128 128 1 8 0 0 WINDOWS _QEB1CL2KL 460489716 6 4.000 44.333 1.154 0.167 0 48 255 255 255 255 255 255 1 8 0 0 WINDOWS _QEB1CLMEE 460489719 6 5.154 22.167 0.077 22.333 1 50 255 255 255 255 255 255 1 8 0 0 WINDOWS _QEB1CKINB 460489713 6 3.923 22.000 1.308 0.167 0 52 128 128 128 128 128 128 1 8 0 0 WINDOWS _QEC13YJZF 44397899115 0 54 6.154 42.000 1.000 15.333 56 55 C -1 -1 -1 255 255 255 57 1 8 1 1 1 1 1 1 1 FFF F 0 WINDOWS _QED0RVPQO 44403303717 0 58 15.692 20.000 8.385 22.167 1 59 0 2 TT WINDOWS _QED0RVPQR 45858831015 2 60 10.769 19.500 5.000 56.000 62 61 C 0 0 0 255 255 255 63 0 8 0 1 1 0 641 1 1 FFT F 0 WINDOWS _QED0RVPQU 44410016220 1 66 15.308 43.167 8.385 22.167 68 67 -1 -1 -1 -1 -1 -1 65 1 8 0 0 691 1 F 0.667 WINDOWS _QED0RVPQX 45858831514 1 70 18.154 67.167 1.308 5.400 73 71 0 0 0 255 255 255 72 0 8 1 0 741 1 F 0 WINDOWS _QJE01A68N 45688348812 1 76 26.769 6.333 2.077 4.500 78 77 -1 -1 -1 -1 -1 -1 75 1 8 0 1 1 1 0 80 0 81 F 82 1 0.667 WINDOWS _QJE01HGDQ 45688347912 1 84 26.769 12.333 2.077 4.500 86 85 -1 -1 -1 -1 -1 -1 83 1 8 0 1 1 1 0 88 0 89 F 90 1 0.667 WINDOWS _QJE01HLCA 45688349512 1 92 26.769 18.333 2.077 4.500 94 93 -1 -1 -1 -1 -1 -1 91 1 8 0 1 1 1 0 96 0 97 F 98 1 0.667 WINDOWS _QJE01KORE 45688347112 1 100 26.769 24.333 2.077 4.500 102 101 -1 -1 -1 -1 -1 -1 99 1 8 0 1 1 1 0 104 0 105 F 106 1 0.667 WINDOWS _QJE01KRM5 45688346512 1 108 26.769 30.333 2.077 4.500 110 109 -1 -1 -1 -1 -1 -1 107 1 8 0 1 1 1 0 112 0 113 F 114 1 0.667 WINDOWS _QJE01MCET 45688345212 1 116 26.769 36.333 2.077 4.500 118 117 -1 -1 -1 -1 -1 -1 115 1 8 0 1 1 1 0 120 0 121 F 122 1 0.667 WINDOWS _QJE01MF0L 45688344312 1 124 26.769 42.333 2.077 4.500 126 125 -1 -1 -1 -1 -1 -1 123 1 8 0 1 1 1 0 128 0 129 F 130 1 0.667 WINDOWS _QJE01OQW7 45688343812 1 132 26.769 48.333 2.077 4.500 134 133 -1 -1 -1 -1 -1 -1 131 1 8 0 1 1 1 0 136 0 137 F 138 1 0.667 WINDOWS _QJE01OT6U 45688343312 1 140 26.769 54.333 2.077 4.500 142 141 -1 -1 -1 -1 -1 -1 139 1 8 0 1 1 1 0 144 0 145 F 146 1 0.667 WINDOWS _QJE01Q3XA 45688342912 1 148 26.769 60.333 2.077 4.500 150 149 -1 -1 -1 -1 -1 -1 147 1 8 0 1 1 1 0 152 0 153 F 154 1 0.667 WINDOWS _QJE01QCUS 45688342512 1 156 26.769 66.333 2.077 4.500 158 157 -1 -1 -1 -1 -1 -1 155 1 8 0 1 1 1 0 160 0 161 F 162 1 0.667 WINDOWS _QJE01QJ1F 45688341912 1 164 26.769 72.333 2.077 4.500 166 165 -1 -1 -1 -1 -1 -1 163 1 8 0 1 1 1 0 168 0 169 F 170 1 0.667 WINDOWS _QJD0LA38B 45688353412 1 172 26.923 2.000 1.769 7.833 174 173 -1 -1 -1 -1 -1 -1 171 1 8 0 1 1 1 0 175 0 176 F 177 1 0.667 WINDOWS _QJD0LD4DB 45688352412 1 179 26.923 10.000 1.769 7.833 181 180 -1 -1 -1 -1 -1 -1 178 1 8 0 1 1 1 0 182 0 183 F 184 1 0.667 WINDOWS _QJD0LDNBZ 45688352812 1 186 26.923 18.000 1.769 7.833 188 187 -1 -1 -1 -1 -1 -1 185 1 8 0 1 1 1 0 189 0 190 F 191 1 0.667 WINDOWS _QJD0LE3M8 45688350812 1 193 26.923 26.000 1.769 7.833 195 194 -1 -1 -1 -1 -1 -1 192 1 8 0 1 1 1 0 196 0 197 F 198 1 0.667 WINDOWS _QJD0LFIJC 45688350312 1 200 26.923 34.000 1.769 7.833 202 201 -1 -1 -1 -1 -1 -1 199 1 8 0 1 1 1 0 203 0 204 F 205 1 0.667 WINDOWS _QJD0LFYWL 45688354212 1 207 26.923 42.000 1.769 7.833 209 208 -1 -1 -1 -1 -1 -1 206 1 8 0 1 1 1 0 210 0 211 F 212 1 0.667 WINDOWS _QJD0LGDO7 45688354912 1 214 26.923 50.000 1.769 7.833 216 215 -1 -1 -1 -1 -1 -1 213 1 8 0 1 1 1 0 217 0 218 F 219 1 0.667 WINDOWS _QJD0LGTKA 45688355612 1 221 26.923 58.000 1.769 7.833 223 222 -1 -1 -1 -1 -1 -1 220 1 8 0 1 1 1 0 224 0 225 F 226 1 0.667 WINDOWS _QJD0LH85A 45688332512 1 228 26.923 66.000 1.769 7.833 230 229 -1 -1 -1 -1 -1 -1 227 1 8 0 1 1 1 0 231 0 232 F 233 1 0.667 WINDOWS _QJD0LHS6B 45688330112 1 235 26.923 74.000 1.769 7.667 237 236 -1 -1 -1 -1 -1 -1 234 1 8 0 1 1 1 0 238 0 239 F 240 1 0.667 WINDOWS _QN60N7V4U 47404763514 1 241 0.923 70.000 1.308 11.667 244 242 -1 -1 -1 -1 -1 -1 243 1 8 1 1 0 245 1 F 0 WINDOWS _QJL0XYSED 45688380010 0 20.000 12.000 WINDOWS _QK71DDKG6 45847149310 0 21.000 10.000 WINDOWS 23 13.000 6.000 11.000 12.000 2 0 246 1 8 WINDOWS 23 24.000 10.000 19.000 20.000 5 0 247 1 14 WINDOWS 23 24.000 10.000 19.000 20.000 5 0 248 3 14 WINDOWS 23 13.000 5.000 11.000 11.000 2 0 249 0 8 MS Sans Serif "Screen Name" readdeac() ..\OFFICES.DBF Offices MS Sans Serif wzheader title "TITLE" MS Sans Serif wzheader title "TITLE" wzheader MS Sans Serif "Embossed Style " MS Sans Serif "Default Objects:" label1 wzlabel1 : MS Sans Serif field wzfield mac3d MS Sans Serif isediting label2 wzlabel2 MS Sans Serif wzfooter +wzfx hstretch above nomac skipgen skiplogic +wzfx float vstretch nomac skipgen skiplogic %wzfx hstretch nomac skipgen skiplogic )wzfx fix vstretch nomac skipgen skiplogic column2 column2 MS Sans Serif standard wzgenfld standard wzmemofld mac3d MS Sans Serif isediting MS Sans Serif m.wzdummy wzgeninv "@*IHN " isediting m.wzckdummy wzcbox mac3d MS Sans Serif "@*C " isediting MS Sans Serif m.top_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZTOP.BMP" btn_val('TOP') 'Go to first record.' MS Sans Serif m.prev_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZBACK.BMP" btn_val('PREV') 'Go to previous record.' MS Sans Serif m.loc_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZLOCATE.BMP" btn_val('LOCATE') 'Locate a record.' MS Sans Serif m.next_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZNEXT.BMP" btn_val('NEXT') 'Go to next record.' MS Sans Serif m.end_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZEND.BMP" btn_val('END') 'Go to last record.' MS Sans Serif m.add_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZNEW.BMP" btn_val('ADD') 'Add a new record.' MS Sans Serif m.edit_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZEDIT.BMP" btn_val('EDIT') 'Edit current record.' MS Sans Serif m.del_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZDELETE.BMP" btn_val('DELETE') 'Delete current record.' MS Sans Serif m.save_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZSAVE.BMP" btn_val('SAVE') 'Save edits.' MS Sans Serif m.can_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZUNDO.BMP" btn_val('CANCEL') 'Cancel edits.' MS Sans Serif m.prnt_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZPRINT.BMP" btn_val('PRINT') 'Print report.' MS Sans Serif m.exit_btn wzfooter picbutton "@*BHN ..\WIZBMPS\WZCLOSE.BMP" btn_val('EXIT') 'Close screen.' MS Sans Serif m.top_btn wzfooter txtbutton "@*HN \<Top" btn_val('TOP') 'Go to first record.' "Top" MS Sans Serif m.prev_btn wzfooter txtbutton "@*HN \<Prev" btn_val('PREV') 'Go to previous record.' "Prev" MS Sans Serif m.next_btn wzfooter txtbutton "@*HN \<Next" btn_val('NEXT') 'Go to next record.' "Next" MS Sans Serif m.end_btn wzfooter txtbutton "@*HN \<End" btn_val('END') 'Go to last record.' "End" MS Sans Serif m.loc_btn wzfooter txtbutton "@*HN \<Locate" btn_val('LOCATE') 'Locate a record.' "Locate" MS Sans Serif m.add_btn wzfooter txtbutton "@*HN \<Add" btn_val('ADD') 'Add a new record.' "Add" MS Sans Serif m.edit_btn wzfooter txtbutton "@*HN Ed\<it" btn_val('EDIT') 'Edit current record.' "Edit" MS Sans Serif m.del_btn wzfooter txtbutton "@*HN \<Delete" btn_val('DELETE') 'Delete current record.' "Delete" MS Sans Serif m.prnt_btn wzfooter txtbutton "@*HN P\<rint" btn_val('PRINT') 'Print report.'3 "Print" MS Sans Serif m.exit_btn wzfooter txtbutton "@*HN \<Close" btn_val('EXIT') 'Close screen.' "Close" find_drop findcbox MS Sans Serif "@*C \<Find..." findval() MS Sans Serif MS Sans Serif MS Sans Serif MS Sans Serif Geneva wzmemofldF wzgenfldF wzgeninvF wzcboxF wzfieldF nooffF wzlabel2F column2F wzlabel1F upperF lowerF wzfooterF inheadF .TMPFF Geneva wz_newwiz SKIPz wz_newwiz wz_newwiz wzborderF wz_newwiz postfldF wzprefxF wz_newwiz wzfxF postfldF wzborderF wzfooterF picbuttonF txtbuttonF inheadF picbuttonF Geneva txtbuttonF wz_newwiz wz_newwiz IHINC IVINC ITPOS IMPOS ILASTPOS WZILBLWID WZIFLDWID IDEFLBLWIDWZSCOLON WZILBLLEN LNOOFFSET WZIMAXFX WZIMAXLBL WZIMAXFLD WZATMPARR WZAARRAY WZAREC WZILASTHT LISNEWCOL SSAVEDBF LCALCFLD ICALCPOS WZLHASENVIWZLHASALIAOBJTYPE VIWZ_FONT WZ_FSIZE WZ_FSTYLE GETSTYLE FONTFACE FONTSIZE FONTSTYLE WZ_MAXW WIDTH WZ_MAXH HEIGHT OBJCODE COMMENT WZ_MHEIGHTWZ_MWIDTH WZ_MFONT GETFONTINFWZ_MFSIZE WZ_MFSTYLEWZ_GHEIGHTWZ_GWIDTH WZ_FVPOS WZ_FHPOS WZ_FFONT WZ_FFSIZE WZ_FFSTYLEWZ_FWIDTH CONVPIX WZ_L2VPOS WZ_COL2POSWZ_LFONT SWZ_LFSIZE WZ_LFSTYLEWZ_LVPOS WZ_LHPOS WZ_V2OFFSEWZ_VOFFSETWZ_HOFFSETI MMENT EWZ_FIELDS WZ_FLIST UPDSTATUS WZTMPSTR WZ_MARGIN WZ_XSMARGIWZ_IS1COL WZ_TESTVPOWZ_MACDIFFWZ_PXFACTOGETVOFF POWZTBLARR OWZ_SPECS TSTAMP WZSSAVEFILGETTAG ATMPARR WZIEDITTYPWZ_STYLE AADDHEADER ACOLSCAN WZ_FCALC GETHEIGHT WZ_ALERT WZATEXT GETHPOS GETVPOS GETWIDTH GETPICTUREWZIBUTTONSFOXELCOL ADDLBLS LEADDFX ADDINVBTN GETHOFF WZ_NEWWIZ EWWIZ PLATFORM BOXED IGETHEIGHTWZ_FLIST WZ_V2OFFSEWZ_MFONT WZ_MFSIZE WZ_MFSTYLEWZ_MHEIGHTWZ_SPECS WZ_FONT WZ_FSIZE WZ_FSTYLE WZ_GHEIGHT GETVOFF NEWPOS GHTT1 FLIST V2OFFSEIHINC IVINC LISNEWCOL GETHEIGHT ILASTPOS IMPOS GETHOFF WZ_IS1COL FLIST WZ_FIELDS IHINC WZIMAXFX WZIMAXLBL WZIMAXFLD WZ_COL2POSIS2COL2LONLISNEWCOL WZ_LHPOS NUMPIXELS WZ_FONT WZ_FSIZE WZ_FSTYLE NUMPIXELS WZ_FONT WZ_FSIZE WZ_FSTYLE NUMFOXELS FSIZE NUMPIXELS WZ_FONT WZ_FSIZE WZ_FSTYLE wzheaderF titleF upperF lowerF properF wz_newwiz wzheadfxF hstretchF floatF wz_newwiz MYTITLE STTWID MYTITLEWD STTHPOS COMMENT WZATMPARR OBJTYPE GETFONTINFWZ_SPECS FCONVPIX GETSTYLE TSTAMP skipmemoF skipgenF skiplogicF nomacF tietolblF vstretchF BOXED aboveF hstretchF hstretchF floatF floatF wz_newwiz CCONTENTS SVWIDTH SVVPOS TLBLWIDTH WZ_FLIST IMPOS CONVPIX NFWZ_MFONT FWZ_MFSIZE WZ_MFSTYLEFOXELCOL WZ_FFONT WZ_FFSIZE WZ_FFSTYLECOMMENT WZTMPSTR WZ_FIELDS SNEWCOL WZSCOLON WZ_LFONT WZ_LFSIZE WZ_LFSTYLEWZ_FVPOS FOXELROW IWZ_MHEIGHTWZ_SPECS WZ_FONT WZ_FSIZE WZ_FSTYLE WZ_GHEIGHTLNOOFFSET WZILBLWID WZ_LHPOS WZ_HOFFSETWZ_FHPOS WZ_FWIDTH IHINC TSTAMP GHTWZIMAXFX wz_newwiz WZLARR WZ_FIELDS WZSCOLON WZ_LVPOS IVINC IHINC IDEFLBLWIDTSTAMP FWZ_LFONT WZ_LFSIZE WZIMAXLBL CONVPIX WZ_LFSTYLE nooffF nooffF IGETHPOS COMMENT WZ_FLIST IMPOS WZ_FHPOS FOXELCOL WZILBLWID WZ_LHPOS DWZ_HOFFSETIHINC IGETVPOS WZ_FLIST IMPOS WZ_VOFFSETWZ_LVPOS IVINC FOXELROW 99/99/99 ARRPOS IGETWIDTH WZ_FLIST WZ_MWIDTH WZ_GWIDTH GETAVECH WZ_FFONT WZ_FFSIZE WZ_FFSTYLET mac3dF "@*C3 " "@*C "8 mac3dF "@3K "@K 8 mac3dF "@3K "@K 8 mac3dF "@3K" "@K"8 SGETPICTURSBASE WZ_FLIST IMPOS COMMENT URGETNUMSTR WZAARRAY MODIFY GENERAL F SHOW GETS OFF wz_newwiz wzgenborderF wz_newwiz WZAREC TURWZATMPARR GETHPOS GETVPOS TSTAMP WZ_FIELDS AARRAY RCOMMENT FOXELCOL FOXELROW BOXED IARRPOS URITMPWIDTH THPOS WZ_FIELDS ITPOS WZ_FLIST CONVPIX GETWIDTH WZ_MFONT WZ_MFSIZE WZ_MFSTYLEWZ_FFONT WZ_FFSIZE WZ_FFSTYLEWZ_SPECS EWZ_MAXW WZ_COL2POSWZ_LHPOS WZILBLWID WZ_HOFFSET NUMCHARS RSGETNUMSTRZ ETNUMSTR MS SANS SERIF Geneva PFONTPARM GETFONTINFFONTFACE RFONTSIZE FGETHEIGHT GETVOFF GETHOFF FOXELROW FOXELCOL CONVPIX ADDHEADER ADDFX ADDLBLS GETHPOS GETVPOS GETWIDTH GETPICTURE ADDINVBTN IS2COL2LON GETNUMSTR GETFONTINF SNIPPET set1 8setup text2btn 197cleanup pictbutton 168cleanup textbutton 140cleanup nosetup 14setup nogeneral 16cleanup general 21cleanup set2 95setup skip 10setup pict2btn 111cleanup common 484cleanup common 256setup print 43cleanup find 368cleanup dfind 321cleanup t_refresh 468cleanup p_refresh 64cleanup multi_edit 419cleanup w_dlogs 286cleanup d_dlogs 226cleanup w_mdlogs 100cleanup d_mdlogs 85cleanup IF RECCOUNT()=0 AND !m.isreadonly AND fox_alert(C_DBFEMPTY) APPEND BLANK ENDIF GOTO TOP SCATTER MEMVAR MEMO ** This screen has only records from the parent table, yet a ** SET SKIP with the child table exists. If you later decide to ** add fields from the child table make sure to remove this line. SET SKIP TO EVAL(RELATION(m.i)) SELECT (TARG T#WNAME wz_win #READCLAUSE NOLOCK #SECTION1 #SECTION2 MOVE WINDOW 'wz_win' CENTERY(RELATION(m.totrel+1)) m.totrel= PROCEDURE edithand PARAMETER m.paction * procedure handles edits DO CASE CASE m.paction = 'ADD' SCATTER MEMVAR MEMO BLANK CASE m.paction = 'SAVE' INSERT INTO (ALIAS()) FROM MEMVAR CASE m.paction = 'CANCEL' * nothing here ENDCASE RETURN PROCEDURE edithand PARAMETER m.paction PRIVATE tmparr =sys(2015) * procedure handles edits * special handling for General fields DO CASE CASE m.paction = 'ADD' =AFIELDS(tmparr) CREATE CURSOR EVAL('m.tempcurs') FROM ARRAY tmparr APPEND BLANK SCATTER MEMVAR MEMO BLANK CASE m.paction = 'SAVE' GATHER MEMVAR MEMO SELECT (m.wzalias) APPEND FROM DBF(m.tempcurs) USE IN (m.tempcurs) CASE m.paction = 'CANCEL' USE IN (tempcurs) SELECT (m.wzalias) ENDCASE RETURN 3SET DELETED &wzolddelete SET FIELDS &wzfields ON ERROR &wzolderror ON KEY LABEL ESCAPE &wzoldesc DO CASE CASE _DOS AND SET('DISPLAY')='VGA25' @24,0 CLEAR TO 24,79 CASE _DOS AND SET('DISPLAY')='VGA50' @49,0 CLEAR TO 49,79 CASE _DOS @24,0 CLEAR TO 24,79 ENDCASE ****Procedures**** PROCEDURE readdeac IF isediting ACTIVATE WINDOW 'wz_win' WAIT WINDOW C_EDITS NOWAIT ENDIF IF !WVISIBLE(WOUTPUT()) CLEAR READ RETURN .T. ENDIF RETURN .F. PROCEDURE readact DO REFRESH IF !isediting SELECT (m.wzalias) SHOW GETS ENDIF RETURN PROCEDURE wizerrorhandler * This very simple error handler is primarily intended * to trap for General field OLE errors which may occur * during editing from the MODIFY GENERAL window. WAIT WINDOW message() RETURN 'Lo PROCEDURE printrec PRIVATE sOldError,wizfname,saverec,savearea,tmpcurs,tmpstr PRIVATE prnt_btn,p_recs,p_output,pr_out,pr_record STORE 1 TO p_recs,p_output STORE 0 TO prnt_btn STORE RECNO() TO saverec m.sOldError=ON('error') DO pdialog IF m.prnt_btn = 2 RETURN ENDIF IF !FILE(ALIAS()+'.FRX') m.wizfname=SYS(2004)+'WIZARDS\'+'WIZARD.APP' IF !FILE(m.wizfname) ON ERROR * m.wizfname=LOCFILE('WIZARD.APP','APP',C_LOCWIZ) ON ERROR &sOldError IF !'WIZARD.APP'$UPPER(m.wizfname) WAIT WINDOW C_NOWIZ RETURN ENDIF ENDIF WAIT WINDOW C_MAKEREPO NOWAIT m.savearea=SELECT() m.tmpcurs='_'+LEFT(SYS(3),7) CREATE CURSOR (m.tmpcurs) (comment m) m.tmpstr = '* LAYOUT = COLUMNAR'+CHR(13)+CHR(10) INSERT INTO (m.tmpcurs) VALUES(m.tmpstr) SELECT (m.savearea) DO (m.wizfname) WITH '','WZ_QREPO','NOSCRN/CREATE',ALIAS(),m.tmpcurs USE IN (m.tmpcurs) WAIT CLEAR IF !FILE(ALIAS()+'.FRX') &&wizard could not create report WAIT WINDOW C_NOREPO RETURN ENDIF ENDIF m.pr_out=IIF(m.p_output=1,'TO PRINT NOCONSOLE','PREVIEW') m.pr_record=IIF(m.p_recs=1,'NEXT 1','ALL') REPORT FORM (ALIAS()) &pr_out &pr_record GO m.saverec RETURN create report WAIT WINDOW C_NOR PROCEDURE REFRESH DO CASE CASE m.isreadonly AND RECCOUNT()=0 SHOW GETS DISABLE SHOW GET exit_btn ENABLE CASE m.isreadonly SHOW GET add_btn DISABLE SHOW GET edit_btn DISABLE SHOW GET del_btn DISABLE SHOW GET save_btn DISABLE SHOW GET can_btn DISABLE CASE (RECCOUNT()=0 OR EOF()) AND !m.isediting SHOW GETS DISABLE SHOW GET add_btn ENABLE SHOW GET exit_btn ENABLE CASE m.isediting SHOW GET find_drop DISABLE SHOW GET top_btn DISABLE SHOW GET prev_btn DISABLE SHOW GET loc_btn DISABLE SHOW GET next_btn DISABLE SHOW GET end_btn DISABLE SHOW GET add_btn DISABLE SHOW GET edit_btn,1 DISABLE SHOW GET del_btn,1 DISABLE SHOW GET prnt_btn DISABLE SHOW GET exit_btn DISABLE SHOW GET save_btn ENABLE SHOW GET can_btn ENABLE ON KEY LABEL ESCAPE DO BTN_VAL WITH 'CANCEL' RETURN OTHERWISE SHOW GET find_drop ENABLE SHOW GET top_btn ENABLE SHOW GET prev_btn ENABLE SHOW GET loc_btn ENABLE SHOW GET next_btn ENABLE SHOW GET end_btn ENABLE SHOW GET add_btn ENABLE SHOW GET edit_btn,1 ENABLE SHOW GET del_btn,1 ENABLE SHOW GET prnt_btn ENABLE SHOW GET exit_btn ENABLE SHOW GET save_btn DISABLE SHOW GET can_btn DISABLE ENDCASE IF m.is2table SHOW GET add_btn DISABLE ENDIF ON KEY LABEL ESCAPE RETURN PROCEDURE deldlog DEFINE WINDOW _qmf0hyyqq ; FROM INT((SROW()-12)/2),INT((SCOL()-52)/2) ; TO INT((SROW()-12)/2)+10,INT((SCOL()-52)/2)+51 ; FLOAT NOCLOSE NOMINIMIZE SHADOW ; COLOR SCHEME 5 TITLE "Microsoft FoxPro" MOVE WINDOW _qmf0hyyqq CENTER ACTIVATE WINDOW _qmf0hyyqq NOSHOW @ 2,7 GET m.cascade ; PICTURE "@*RVN \<Parent record only;Parent and \<related child records" ; DEFAULT 1 @ 7,13 GET m.okbtn ; PICTURE "@*HTN \<Delete;\!\?\<Cancel" ; SIZE 1,10,4 DEFAULT 1 ACTIVATE WINDOW _qmf0hyyqq READ CYCLE MODAL RELEASE WINDOW _qmf0hyyqq RETURN IIF(m.okbtn=2,0,m.cascade) DIMENSION wztblarr[1,2] * 1st element holds alias name * 2nd element holds unique name for array name DO initarrays FOR i =1 TO ALEN(wztblarr,1) DIMENSION (wztblarr[m.i,2])+"[1]" ENDFOR m.is2table = .T. SELECT (wztblarr[1,1]) GO TOP WAIT WINDOW C_MULTITABLE TIMEOUT 1 T (m.wzalias) SHOW GETS PROCEDURE deldlog DEFINE WINDOW _qmf0hyyqq ; AT 0.000, 0.000 SIZE 10.769,57.800 ; TITLE "Delete Record" ; FONT "MS Sans Serif", 8 ; FLOAT NOMINIMIZE DOUBLE MOVE WINDOW _qmf0hyyqq CENTER ACTIVATE WINDOW _qmf0hyyqq NOSHOW @ 2.846,7.200 GET m.cascade ; PICTURE "@*RVN Parent record only;Parent and related child records" ; SIZE 1.308,34.500,0.308 ; DEFAULT 1 FONT "MS Sans Serif", 8 STYLE "BT" @ 8.308,17.200 GET m.okbtn ; PICTURE "@*HTN \<Delete;\<Cancel" ; SIZE 1.769,8.667,1.333 ; DEFAULT 1 FONT "MS Sans Serif", 8 STYLE "B" ACTIVATE WINDOW _qmf0hyyqq READ CYCLE MODAL RELEASE WINDOW _qmf0hyyqq RETURN IIF(m.okbtn=2,0,m.cascade) PROCEDURE BTN_VAL PARAMETER m.btnname DO CASE CASE m.btnname='TOP' GO TOP WAIT WINDOW C_TOPFILE NOWAIT CASE m.btnname='PREV' IF !BOF() SKIP -1 ENDIF IF BOF() WAIT WINDOW C_TOPFILE NOWAIT GO TOP ENDIF CASE m.btnname='NEXT' IF !EOF() SKIP 1 ENDIF IF EOF() WAIT WINDOW C_ENDFILE NOWAIT GO BOTTOM ENDIF CASE m.btnname='END' GO BOTTOM WAIT WINDOW C_ENDFILE NOWAIT CASE m.btnname='LOCATE' DO loc_dlog CASE m.btnname='ADD' AND !isediting &&add record isediting=.T. isadding=.T. wzlastrec = RECNO() =edithand('ADD') _curobj=1 DO refresh SHOW GETS RETURN CASE m.btnname='EDIT' AND !isediting &&edit record IF edithand('EDIT') isediting=.T. _curobj=1 DO refresh RETURN ENDIF WAIT WINDOW C_NOLOCK CASE m.btnname='SAVE' AND isediting &&Save record IF m.isadding DO addrel ENDIF UNLOCK ALL isediting=.F. isadding=.F. DO refresh CASE m.btnname='CANCEL' AND isediting &&Cancel record IF isadding =edithand('CANADD') ELSE =edithand('CANCEL') ENDIF isediting=.F. isadding=.F. UNLOCK ALL WAIT WINDOW C_ECANCEL NOWAIT DO refresh CASE m.btnname='DELETE' m.retval=deldlog() DO CASE CASE m.retval = 0 RETURN CASE m.retval = 1 &&delete only parent record DELETE CASE m.retval = 2 &&cascading delete WAIT WINDOW C_DELNOTE NOWAIT DO casdel WAIT CLEAR ENDCASE IF !EOF() AND DELETED() SKIP ENDIF IF EOF() WAIT WINDOW C_ENDFILE NOWAIT GO BOTTOM ENDIF DO refresh CASE m.btnname='PRINT' DO printrec RETURN CASE m.btnname='EXIT' m.bailout=.T. &&this is needed if used with FoxApp CLEAR READ RETURN ENDCASE SCATTER MEMVAR MEMO SHOW GETS RETURN PROCEDURE BTN_VAL PARAMETER m.btnname DO CASE CASE m.btnname='TOP' GO TOP WAIT WINDOW C_TOPFILE NOWAIT CASE m.btnname='PREV' IF !BOF() SKIP -1 ENDIF IF BOF() WAIT WINDOW C_TOPFILE NOWAIT GO TOP ENDIF CASE m.btnname='NEXT' IF !EOF() SKIP 1 ENDIF IF EOF() WAIT WINDOW C_ENDFILE NOWAIT GO BOTTOM ENDIF CASE m.btnname='END' GO BOTTOM WAIT WINDOW C_ENDFILE NOWAIT CASE m.btnname='LOCATE' DO loc_dlog CASE m.btnname='ADD' AND !isediting &&add record isediting=.T. isadding=.T. =edithand('ADD') _curobj=1 DO refresh SHOW GETS RETURN CASE m.btnname='EDIT' AND !isediting &&edit record IF EOF() OR BOF() WAIT WINDOW C_ENDFILE NOWAIT RETURN ENDIF IF RLOCK() isediting=.T. _curobj=1 DO refresh RETURN ELSE WAIT WINDOW C_NOLOCK ENDIF CASE m.btnname='EDIT' AND isediting &&save record IF isadding =edithand('SAVE') ELSE GATHER MEMVAR MEMO ENDIF UNLOCK isediting=.F. isadding=.F. DO refresh CASE m.btnname='DELETE' AND isediting &&cancel record IF isadding =edithand('CANCEL') ENDIF isediting=.F. isadding=.F. UNLOCK WAIT WINDOW C_ECANCEL NOWAIT DO refresh CASE m.btnname='DELETE' IF EOF() OR BOF() WAIT WINDOW C_ENDFILE NOWAIT RETURN ENDIF IF fox_alert(C_DELREC) DELETE IF !EOF() AND DELETED() SKIP 1 ENDIF IF EOF() WAIT WINDOW C_ENDFILE NOWAIT GO BOTTOM ENDIF ENDIF CASE m.btnname='PRINT' DO printrec RETURN CASE m.btnname='EXIT' m.bailout=.T. &&this is needed if used with FoxApp CLEAR READ RETURN ENDCASE SCATTER MEMVAR MEMO SHOW GETS RETURN PROCEDURE BTN_VAL PARAMETER m.btnname DO CASE CASE m.btnname='TOP' GO TOP WAIT WINDOW C_TOPFILE NOWAIT CASE m.btnname='PREV' IF !BOF() SKIP -1 ENDIF IF BOF() WAIT WINDOW C_TOPFILE NOWAIT GO TOP ENDIF CASE m.btnname='NEXT' IF !EOF() SKIP 1 ENDIF IF EOF() WAIT WINDOW C_ENDFILE NOWAIT GO BOTTOM ENDIF CASE m.btnname='END' GO BOTTOM WAIT WINDOW C_ENDFILE NOWAIT CASE m.btnname='LOCATE' DO loc_dlog CASE m.btnname='ADD' AND !isediting &&add record isediting=.T. isadding=.T. =edithand('ADD') _curobj=1 DO refresh SHOW GETS RETURN CASE m.btnname='EDIT' AND !isediting &&edit record IF EOF() OR BOF() WAIT WINDOW C_ENDFILE NOWAIT RETURN ENDIF IF RLOCK() isediting=.T. _curobj=1 DO refresh RETURN ELSE WAIT WINDOW C_NOLOCK RETURN ENDIF CASE m.btnname='SAVE' AND isediting &&save record IF isadding =edithand('SAVE') ELSE GATHER MEMVAR MEMO ENDIF UNLOCK isediting=.F. isadding=.F. DO refresh CASE m.btnname='CANCEL' AND isediting &&cancel record IF isadding =edithand('CANCEL') ENDIF isediting=.F. isadding=.F. UNLOCK WAIT WINDOW C_ECANCEL NOWAIT DO refresh CASE m.btnname='DELETE' IF EOF() OR BOF() WAIT WINDOW C_ENDFILE NOWAIT RETURN ENDIF IF fox_alert(C_DELREC) DELETE IF !EOF() AND DELETED() SKIP 1 ENDIF IF EOF() WAIT WINDOW C_ENDFILE NOWAIT GO BOTTOM ENDIF ELSE RETURN ENDIF CASE m.btnname='PRINT' DO printrec RETURN CASE m.btnname='EXIT' m.bailout=.T. &&this is needed if used with FoxApp CLEAR READ RETURN OTHERWISE RETURN ENDCASE SCATTER MEMVAR MEMO SHOW GETS RETURN PROCEDURE BTN_VAL PARAMETER m.btnname DO CASE CASE m.btnname='TOP' GO TOP WAIT WINDOW C_TOPFILE NOWAIT CASE m.btnname='PREV' IF !BOF() SKIP -1 ENDIF IF BOF() WAIT WINDOW C_TOPFILE NOWAIT GO TOP ENDIF CASE m.btnname='NEXT' IF !EOF() SKIP 1 ENDIF IF EOF() WAIT WINDOW C_ENDFILE NOWAIT GO BOTTOM ENDIF CASE m.btnname='END' GO BOTTOM WAIT WINDOW C_ENDFILE NOWAIT CASE m.btnname='LOCATE' DO loc_dlog CASE m.btnname='ADD' &&add record isediting=.T. isadding=.T. wzlastrec = RECNO() =edithand('ADD') _curobj=1 DO refresh SHOW GETS RETURN CASE m.btnname='EDIT' AND !isediting &&edit record IF edithand('EDIT') isediting=.T. _curobj=1 DO refresh RETURN ENDIF WAIT WINDOW C_NOLOCK CASE m.btnname='EDIT' AND isediting &&Save record IF m.isadding DO addrel ENDIF UNLOCK ALL isediting=.F. isadding=.F. DO refresh CASE m.btnname='DELETE' AND isediting &&Cancel record IF isadding =edithand('CANADD') ELSE =edithand('CANCEL') ENDIF isediting=.F. isadding=.F. UNLOCK ALL WAIT WINDOW C_ECANCEL NOWAIT DO refresh CASE m.btnname='DELETE' m.retval=deldlog() DO CASE CASE m.retval = 0 RETURN CASE m.retval = 1 &&delete only parent record DELETE CASE m.retval = 2 &&cascading delete WAIT WINDOW C_DELNOTE NOWAIT DO casdel WAIT CLEAR ENDCASE IF !EOF() AND DELETED() SKIP ENDIF IF EOF() WAIT WINDOW C_ENDFILE NOWAIT GO BOTTOM ENDIF DO refresh CASE m.btnname='PRINT' DO printrec RETURN CASE m.btnname='EXIT' m.bailout=.T. &&this is needed if used with FoxApp CLEAR READ RETURN ENDCASE SCATTER MEMVAR MEMO SHOW GETS RETURN PROCEDURE fox_alert PARAMETER wzalrtmess PRIVATE alrtbtn m.alrtbtn=2 DEFINE WINDOW _qec1ij2t7 ; FROM INT((SROW()-12)/2),INT((SCOL()-52)/2) ; TO INT((SROW()-12)/2)+8,INT((SCOL()-52)/2)+51 ; FLOAT NOCLOSE NOMINIMIZE DOUBLE ; COLOR SCHEME 12 TITLE WTITLE() MOVE WINDOW _qec1ij2t7 CENTER ACTIVATE WINDOW _qec1ij2t7 NOSHOW @ 2,(50-LEN(wzalrtmess))/2 SAY wzalrtmess @ 6,13 GET m.alrtbtn SIZE 1,10,4; PICTURE "@*HT \<OK;\?\!\<Cancel" ACTIVATE WINDOW _qec1ij2t7 READ CYCLE MODAL RELEASE WINDOW _qec1ij2t7 RETURN m.alrtbtn=1 PROCEDURE pdialog DEFINE WINDOW _qjn12zbvh ; FROM INT((SROW()-12)/2),INT((SCOL()-52)/2) ; TO INT((SROW()-12)/2)+12,INT((SCOL()-52)/2)+51 ; FLOAT NOCLOSE NOMINIMIZE SHADOW ; COLOR SCHEME 5 TITLE "Microsoft FoxPro" MOVE WINDOW _qjn12zbvh CENTER ACTIVATE WINDOW _qjn12zbvh NOSHOW @ 2,5 SAY "Print:" @ 2,34 SAY "Output:" @ 4,5 GET m.p_recs ; PICTURE "@*RVN \<Current Record;\<All Records" ; DEFAULT 1 @ 4,34 GET m.p_output ; PICTURE "@*RVN \<Printer;Pre\<view" ; DEFAULT 1 @ 10,13 GET m.prnt_btn ; PICTURE "@*HT P\!\<rint;Ca\?\<ncel" ; SIZE 1,10,4 ; DEFAULT 1 ACTIVATE WINDOW _qjn12zbvh READ CYCLE MODAL RELEASE WINDOW _qjn12zbvh RETURN PROCEDURE loc_dlog PRIVATE gfields,i DEFINE WINDOW wzlocate FROM 1,1 TO 15,40; SYSTEM GROW CLOSE ZOOM FLOAT; SHADOW COLOR SCHEME 10 MOVE WINDOW wzlocate CENTER m.gfields=SET('FIELDS',2) IF !EMPTY(RELATION(1)) SET FIELDS ON IF m.gfields # 'GLOBAL' SET FIELDS GLOBAL ENDIF IF EMPTY(FLDLIST()) m.i=1 DO WHILE !EMPTY(OBJVAR(m.i)) IF ATC('M.',OBJVAR(m.i))=0 SET FIELDS TO (OBJVAR(m.i)) ENDIF m.i = m.i + 1 ENDDO ENDIF ENDIF BROWSE WINDOW wzlocate NOEDIT NODELETE ; NOMENU TITLE C_BRTITLE SET FIELDS &gfields SET FIELDS OFF RELEASE WINDOW wzlocate RETURN S#WNAME wz_win #READCLAUSE NOLOCK *~ WIZARDSCREEN #SECTION1 PRIVATE wzfields,wztalk IF SET("TALK") = "ON" SET TALK OFF m.wztalk = "ON" m.wztalk = "OFF" ENDIF m.wzfields=SET('FIELDS') SET FIELDS OFF IF m.wztalk = "ON" SET TALK ON ENDIF #SECTION2 #DEFINE C_DBFEMPTY 'Database is empty, add a record?' #DEFINE C_EDITS 'Please finish your edits.' #DEFINE C_TOPFILE 'Top of file.' #DEFINE C_ENDFILE 'End of file.' #DEFINE C_BRTITLE 'Locate Record' #DEFINE C_NOLOCK 'Sorry, could not lock record -- try again later.' #DEFINE C_ECANCEL 'Edits Canceled.' #DEFINE C_DELREC 'Delete selected record?' #DEFINE C_NOFEAT 'Feature not available yet.' #DEFINE C_NOWIZ 'Wizard application is not available.' #DEFINE C_MAKEREPO 'Creating report with Report Wizard.' #DEFINE C_NOREPO 'Could not create report.' #DEFINE C_DELNOTE 'Deleting records...' #DEFINE C_READONLY 'Table is read-only. No editing allowed.' #DEFINE C_NOTABLE 'No table selected. Open table or run query.' #DEFINE C_BADEXPR 'Invalid expression.' #DEFINE C_LOCWIZ 'Locate WIZARD.APP:' #DEFINE C_MULTITABLE 'You have multiple related tables. Adding records in not allowed.' MOVE WINDOW 'wz_win' CENTER PRIVATE isediting,isadding,wztblarr PRIVATE wzolddelete,wzolderror,wzoldesc PRIVATE wzalias, tempcurs,wzlastrec PRIVATE isreadonly,find_drop,is2table IF EMPTY(ALIAS()) WAIT WINDOW C_NOTABLE RETURN ENDIF m.wztblarr= '' m.wzalias=SELECT() m.isediting=.F. m.isadding=.F. m.is2table = .F. m.wzolddelete=SET('DELETE') SET DELETED ON m.tempcurs=SYS(2015) &&used if General field m.wzlastrec = 1 m.wzolderror=ON('error') ON ERROR DO wizerrorhandler wzoldesc=ON('KEY','ESCAPE') ON KEY LABEL ESCAPE m.find_drop = IIF(_DOS,0,2) m.isreadonly=IIF(ISREAD(),.T.,.F.) IF m.isreadonly WAIT WINDOW C_READONLY TIMEOUT 1 ENDIF PROCEDURE fox_alert PARAMETER wzalrtmess PRIVATE alrtbtn m.alrtbtn=2 DEFINE WINDOW _qec1ij2t7 AT 0,0 SIZE 8,50 ; FONT "MS Sans Serif",10 STYLE 'B' ; FLOAT NOCLOSE NOMINIMIZE DOUBLE TITLE WTITLE() MOVE WINDOW _qec1ij2t7 CENTER ACTIVATE WINDOW _qec1ij2t7 NOSHOW @ 2,(50-txtwidth(wzalrtmess))/2 SAY wzalrtmess; FONT "MS Sans Serif", 10 STYLE "B" @ 6,18 GET m.alrtbtn ; PICTURE "@*HT \<OK;\?\!\<Cancel" ; SIZE 1.769,8.667,1.333 ; FONT "MS Sans Serif", 8 STYLE "B" ACTIVATE WINDOW _qec1ij2t7 READ CYCLE MODAL RELEASE WINDOW _qec1ij2t7 RETURN m.alrtbtn=1 PROCEDURE pdialog DEFINE WINDOW _qjn12zbvh ; AT 0.000, 0.000 ; SIZE 13.231,54.800 ; TITLE "Microsoft FoxPro" ; FONT "MS Sans Serif", 8 ; FLOAT NOCLOSE MINIMIZE SYSTEM MOVE WINDOW _qjn12zbvh CENTER ACTIVATE WINDOW _qjn12zbvh NOSHOW @ 2.846,33.600 SAY "Output:" ; FONT "MS Sans Serif", 8 ; STYLE "BT" @ 2.846,4.800 SAY "Print:" ; FONT "MS Sans Serif", 8 ; STYLE "BT" @ 4.692,7.200 GET m.p_recs ; PICTURE "@*RVN \<Current Record;\<All Records" ; SIZE 1.308,18.500,0.308 ; DEFAULT 1 ; FONT "MS Sans Serif", 8 ; STYLE "BT" @ 4.692,36.000 GET m.p_output ; PICTURE "@*RVN \<Printer;Pre\<view" ; SIZE 1.308,12.000,0.308 ; DEFAULT 1 ; FONT "MS Sans Serif", 8 ; STYLE "BT" @ 10.154,16.600 GET m.prnt_btn ; PICTURE "@*HT P\<rint;Ca\<ncel" ; SIZE 1.769,8.667,0.667 ; DEFAULT 1 ; FONT "MS Sans Serif", 8 ; STYLE "B" ACTIVATE WINDOW _qjn12zbvh READ CYCLE MODAL RELEASE WINDOW _qjn12zbvh RETURN PROCEDURE loc_dlog PRIVATE gfields,i DEFINE WINDOW wzlocate FROM 1,1 TO 20,40; SYSTEM GROW CLOSE ZOOM FLOAT FONT "MS Sans Serif",8 MOVE WINDOW wzlocate CENTER m.gfields=SET('FIELDS',2) IF !EMPTY(RELATION(1)) SET FIELDS ON IF m.gfields # 'GLOBAL' SET FIELDS GLOBAL ENDIF IF EMPTY(FLDLIST()) m.i=1 DO WHILE !EMPTY(OBJVAR(m.i)) IF ATC('M.',OBJVAR(m.i))=0 SET FIELDS TO (OBJVAR(m.i)) ENDIF m.i = m.i + 1 ENDDO ENDIF ENDIF BROWSE WINDOW wzlocate NOEDIT NODELETE ; NOMENU TITLE C_BRTITLE SET FIELDS &gfields SET FIELDS OFF RELEASE WINDOW wzlocate RETURN PROCEDURE findval #DEFINE MAXGETS 100 * create the fields array from gets on screen DIMENSION wzafields(MAXGETS) i = 1 DO WHILE !EMPTY(FIELD(i)) wzafields(i) = FIELD(i) i = i + 1 ENDDO DIMENSION wzafields(i-1) m.retval=finddlog() DO CASE CASE m.retval=0 m.find_drop = ABS(m.find_drop-1) RETURN CASE m.retval=1 m.find_drop = 1 GO TOP COUNT to m.fndcnt WAIT WINDOW 'Found '+ALLTRIM(STR(m.fndcnt))+' records.' NOWAIT OTHERWISE m.find_drop = 0 ENDCASE IF EOF() GO TOP ENDIF SCATTER MEMVAR MEMO SHOW GETS RETURN PROCEDURE finddlog IF NOT WEXIST("_qn212xmo7") DEFINE WINDOW _qn212xmo7 ; FROM INT((SROW()-15)/2),INT((SCOL()-66)/2) ; TO INT((SROW()-15)/2)+14,INT((SCOL()-66)/2)+65 ; TITLE "Microsoft FoxPro" ; FLOAT NOCLOSE SHADOW ; NOMINIMIZE DOUBLE ; COLOR SCHEME 5 ENDIF dimension wzaops(7) wzaops(1) = "=" wzaops(2) = "<" wzaops(3) = "<=" wzaops(4) = ">" wzaops(5) = ">=" wzaops(6) = "<>" wzaops(7) = "==" IF WVISIBLE("_qn212xmo7") ACTIVATE WINDOW _qn212xmo7 SAME ACTIVATE WINDOW _qn212xmo7 NOSHOW ENDIF @ 1,3 SAY "Which records do you want to see?" ; SIZE 1,33, 0 @ 6,3 SAY "Fields:" ; SIZE 1,7, 0 @ 6,25 SAY "Operators:" ; SIZE 1,10, 0 @ 6,40 SAY "Value:" ; SIZE 1,6, 0 @ 3,16 GET fradio1 ; PICTURE "@*RHN \<Filter;\<All Records" ; SIZE 1,15,0 ; DEFAULT 1 ; VALID fradioval() @ 7,2 GET m.wzifields ; PICTURE "@^" ; FROM wzafields ; SIZE 3,19 ; DEFAULT 1 ; COLOR SCHEME 5, 6 @ 7,24 GET m.wziOps ; PICTURE "@^" ; FROM wzaOps ; SIZE 3,12 ; DEFAULT 1 ; COLOR SCHEME 5, 6 @ 8,40 GET m.wzsValue ; SIZE 1,22 ; DEFAULT " " ; PICTURE "@K!" ; WHEN valuewhen() @ 12,22 GET m.wzidone ; PICTURE "@*HN \<OK;\<Cancel" ; SIZE 1,8,2 ; DEFAULT 1 ; VALID findbtn() IF NOT WVISIBLE("_qn212xmo7") ACTIVATE WINDOW _qn212xmo7 ENDIF READ CYCLE MODAL RELEASE WINDOW _qn212xmo7 RETURN IIF(m.wzidone=2,0,m.fradio1) PROCEDURE valuewhen DO CASE CASE _Windows OR _DOS IF EMPTY(EVAL(VARREAD())) KEYBOARD "{home}" ENDIF ENDCASE RETURN PROCEDURE findbtn DO CASE CASE m.wzidone = 1 AND m.fradio1 = 1 DO CASE CASE TYPE(wzafields(m.wzifields)) = "C" m.theval = "'" + ALLTRIM(m.wzsvalue) +"'" CASE TYPE(wzafields(m.wzifields)) = "D" m.theval = "{" + ALLTRIM(m.wzsvalue) + "}" OTHERWISE m.theval = ALLTRIM(m.wzsvalue) ENDCASE m.wzcfiltexpr = wzafields(m.wzifields)+wzaops(m.wziops)+m.theval IF TYPE(m.wzcfiltexpr)#"L" WAIT WINDOW C_BADEXPR _CUROBJ = OBJNUM(m.wzsValue) RETURN ENDIF SET FILTER TO &wzcfiltexpr CASE m.wzidone = 1 AND m.fradio1 = 2 SET FILTER TO CASE m.wzidone = 2 ENDCASE CLEAR READ RETURN PROCEDURE fradioval DO CASE CASE m.fradio1 = 1 SHOW GETS ENABLE CASE m.fradio1 = 2 SHOW GET m.wzifields DISABLE SHOW GET m.wziOps DISABLE SHOW GET m.wzsValue DISABLE ENDCASE RETURN PROCEDURE findval DO CASE CASE m.find_drop = 1 #DEFINE MAXGETS 100 * create the fields array from gets on screen DIMENSION wzafields(MAXGETS) i = 1 DO WHILE !EMPTY(FIELD(i)) wzafields(i) = FIELD(i) i = i + 1 ENDDO DIMENSION wzafields(i-1) IF !finddlog() RETURN ENDIF GO TOP COUNT to m.fndcnt WAIT WINDOW 'Found '+ALLTRIM(STR(m.fndcnt))+' records.' NOWAIT CASE m.find_drop = 2 SET FILTER TO ENDCASE IF EOF() GO TOP ENDIF SCATTER MEMVAR MEMO SHOW GETS RETURN PROCEDURE finddlog m.rborder = SET("READBORDER") SET READBORDER ON IF NOT WEXIST("_qn20z1r1q") DEFINE WINDOW _qn20z1r1q ; AT 0.000, 0.000 ; SIZE 10.077,62.000 ; TITLE "Microsoft FoxPro" ; FONT "MS Sans Serif", 8 ; STYLE "B" FLOAT NOCLOSE ; MINIMIZE SYSTEM ; COLOR RGB(,,,192,192,192) MOVE WINDOW _qn20z1r1q CENTER ENDIF dimension wzaops(7) wzaops(1) = "=" wzaops(2) = "<" wzaops(3) = "<=" wzaops(4) = ">" wzaops(5) = ">=" wzaops(6) = "<>" wzaops(7) = "==" IF WVISIBLE("_qn20z1r1q") ACTIVATE WINDOW _qn20z1r1q SAME ELSE ACTIVATE WINDOW _qn20z1r1q NOSHOW ENDIF @ 4.615,2.833 GET m.wzifields ; PICTURE "@^" ; FROM wzafields ; SIZE 1.538,19.333 ; DEFAULT 1 ; FONT "MS Sans Serif", 8 ; STYLE "B" @ 4.615,24.833 GET m.wziOps ; PICTURE "@^" ; FROM wzaOps ; SIZE 1.538,12.000 ; DEFAULT 1 ; FONT "MS Sans Serif", 8 ; STYLE "B" @ 4.923,40.167 GET m.wzsValue ; SIZE 1.000,22.000 ; DEFAULT " " ; FONT "MS Sans Serif", 8 ; PICTURE "@K!" ; WHEN valuewhen() ; COLOR ,RGB(,,,255,255,255) @ 1.000,2.833 SAY "Which records do you want to see?" ; FONT "MS Sans Serif", 8 ; STYLE "BT" @ 7.538,20.833 GET m.wzidone ; PICTURE "@*HN \<OK;\<Cancel" ; SIZE 1.615,8.667,1.667 ; DEFAULT 1 ; FONT "MS Sans Serif", 8 ; STYLE "B" ; VALID findbtn() @ 3.538,3.000 SAY "Fields:" ; FONT "MS Sans Serif", 8 ; STYLE "BT" @ 3.538,24.833 SAY "Operators:" ; FONT "MS Sans Serif", 8 ; STYLE "BT" @ 3.538,40.833 SAY "Value:" ; FONT "MS Sans Serif", 8 ; STYLE "BT" @ 6.692,2.833 TO 6.692,59.000 ; PEN 1, 8 ; STYLE "1" ; COLOR RGB(128,128,128,128,128,128) @ 6.769,3.000 TO 6.769,59.167 ; PEN 1, 8 ; STYLE "1" ; COLOR RGB(255,255,255,255,255,255) IF NOT WVISIBLE("_qn20z1r1q") ACTIVATE WINDOW _qn20z1r1q ENDIF READ CYCLE MODAL RELEASE WINDOW _qn20z1r1q SET READBORDER &rborder RETURN m.wzidone=1 PROCEDURE valuewhen DO CASE CASE _Windows OR _DOS IF EMPTY(EVAL(VARREAD())) KEYBOARD "{home}" ENDIF ENDCASE RETURN PROCEDURE findbtn DO CASE CASE m.wzidone = 1 DO CASE CASE TYPE(wzafields(m.wzifields)) = "C" m.theval = "'" + ALLTRIM(m.wzsvalue) +"'" CASE TYPE(wzafields(m.wzifields)) = "D" m.theval = "{" + ALLTRIM(m.wzsvalue) + "}" OTHERWISE m.theval = ALLTRIM(m.wzsvalue) ENDCASE m.wzcfiltexpr = wzafields(m.wzifields)+wzaops(m.wziops)+m.theval IF TYPE(m.wzcfiltexpr)#"L" WAIT WINDOW C_BADEXPR _CUROBJ = OBJNUM(m.wzsValue) RETURN ENDIF SET FILTER TO &wzcfiltexpr CASE m.wzidone = 2 ENDCASE CLEAR READ RETURN PROCEDURE edithand PARAMETER m.paction * procedure handles edits PRIVATE i,tmparea tmparea = SELECT() DO CASE CASE m.paction = 'ADD' FOR i =1 TO ALEN(wztblarr,1) SELECT (wztblarr[m.i,1]) APPEND BLANK =RLOCK() ENDFOR CASE m.paction = 'EDIT' FOR i =1 TO ALEN(wztblarr,1) SELECT (wztblarr[m.i,1]) IF RLOCK() SCATTER TO (wztblarr[m.i,2]) MEMO ELSE SELECT (m.tmparea) RETURN .F. ENDIF ENDFOR CASE m.paction = 'CANCEL' FOR i =1 TO ALEN(wztblarr,1) SELECT (wztblarr[m.i,1]) IF EOF() LOOP ENDIF GATHER FROM (wztblarr[m.i,2]) MEMO ENDFOR UNLOCK ALL CASE m.paction = 'CANADD' FOR i =1 TO ALEN(wztblarr,1) SELECT (wztblarr[m.i,1]) DELETE SELECT (m.tmparea) ENDFOR SELECT (m.tmparea) GO m.wzlastrec ENDCASE SELECT (m.tmparea) RETURN .T. PROCEDURE initarrays PRIVATE i,z m.i = 1 wztblarr[1,1]=ALIAS() wztblarr[1,2]=SYS(2015) * Get all tables involved in query. It checks for * parent-child relations and relations off of childs. DO WHILE .T. SELECT (wztblarr[m.i,1]) m.z=1 DO WHILE !EMPTY(TARG(m.z)) DIMENSION wztblarr[ALEN(wztblarr,1)+1,2] wztblarr[ALEN(wztblarr,1),1]=TARG(m.z) wztblarr[ALEN(wztblarr,1),2]=SYS(2015) m.z=m.z+1 ENDDO IF m.i=ALEN(wztblarr,1) EXIT ENDIF m.i=m.i+1 ENDDO IF RECCOUNT()=0 AND fox_alert(C_DBFEMPTY) APPEND BLANK ENDIF GOTO TOP RETURN PROCEDURE addrel PRIVATE i,wzfldname,tmprec,wzorder tmprec = RECNO() FOR m.i = 1 TO ALEN(wztblarr,1) SELECT (wztblarr[m.i,1]) m.z = 1 DO WHILE !EMPTY(TARGET(m.z,(wztblarr[m.i,1]))) SELECT (TARGET(m.z)) m.wzkey=KEY() IF AT('(',m.wzkey)=0 AND AT('+',m.wzkey)=0 * skip compound expressions SELECT (wztblarr[m.i,1]) wzfldname = EVAL(RELATION(m.z)) SELECT (TARGET(m.z)) REPLACE (m.wzkey) WITH m.wzfldname ENDIF m.z = m.z + 1 ENDDO ENDFOR SELECT wztblarr[1,1] GO m.tmprec RETURN PROCEDURE casdel * This routine does a cascading delete * across the entire relationship tree. * Note: it recursively calls itself PRIVATE i,pkey,ckey,totrel,palias m.palias = ALIAS() GO RECNO() m.totrel = 1 DO WHILE !EMPTY(RELATION(m.totrel+1)) m.totrel=m.totrel+1 ENDDO m.pkey = IIF(EMPTY(ORDER()),'',EVAL(KEY())) * check if no relation exists IF !EMPTY(RELATION(1)) DO WHILE .T. *check all relationships for parent FOR i = 1 TO m.totrel m.ckey = EVAL(RELATION(m.i)) SELECT (TARGET(m.i)) * child related records IF !EOF() IF !EMPTY(RELATION(1)) * call recursively DO casdel ELSE * delete all child records DO WHILE .T. DELETE SKIP IF EVAL(KEY())#m.ckey EXIT ENDIF ENDDO ENDIF ENDIF SELECT (m.palias) ENDFOR * delete only one for parent DELETE IF !EOF() SKIP ENDIF IF m.palias=wztblarr[1,1] OR EOF() OR; EMPTY(m.pkey) OR EVAL(KEY())#m.pkey EXIT ENDIF ENDDO ENDIF RETURN PROCEDURE REFRESH DO CASE CASE m.isreadonly AND RECCOUNT()=0 SHOW GETS DISABLE SHOW GET exit_btn ENABLE CASE m.isreadonly SHOW GET add_btn DISABLE SHOW GET del_btn DISABLE SHOW GET edit_btn DISABLE CASE (RECCOUNT()=0 OR EOF()) AND !m.isediting SHOW GETS DISABLE SHOW GET add_btn ENABLE SHOW GET exit_btn ENABLE CASE m.isediting SHOW GET find_drop DISABLE SHOW GET top_btn DISABLE SHOW GET prev_btn DISABLE SHOW GET loc_btn DISABLE SHOW GET next_btn DISABLE SHOW GET end_btn DISABLE SHOW GET add_btn DISABLE SHOW GET prnt_btn DISABLE SHOW GET exit_btn DISABLE SHOW GET edit_btn,1 PROMPT "\<Save" SHOW GET del_btn,1 PROMPT "\<Cancel" ON KEY LABEL ESCAPE DO BTN_VAL WITH 'DELETE' RETURN OTHERWISE SHOW GET edit_btn,1 PROMPT "Ed\<it" SHOW GET del_btn,1 PROMPT "\<Delete" SHOW GETS ENABLE ENDCASE IF m.is2table SHOW GET add_btn DISABLE ENDIF ON KEY LABEL ESCAPE RETURN 3SET DELETED &wzolddelete SET FIELDS &wzfields ON ERROR &wzolderror ON KEY LABEL ESCAPE &wzoldesc DO CASE CASE _DOS AND SET('DISPLAY')='VGA25' @24,0 CLEAR TO 24,79 CASE _DOS AND SET('DISPLAY')='VGA50' @49,0 CLEAR TO 49,79 CASE _DOS @24,0 CLEAR TO 24,79 ENDCASE ****Procedures**** PROCEDURE readdeac IF isediting ACTIVATE WINDOW 'wz_win' WAIT WINDOW C_EDITS NOWAIT ENDIF IF !WVISIBLE(WOUTPUT()) CLEAR READ RETURN .T. ENDIF RETURN .F. PROCEDURE readact IF !isediting SELECT (m.wzalias) SHOW GETS ENDIF DO REFRESH RETURN PROCEDURE wizerrorhandler * This very simple error handler is primarily intended * to trap for General field OLE errors which may occur * during editing from the MODIFY GENERAL window. WAIT WINDOW message() RETURN FNAME wzback.bmp 8 wzclose.bmp 14 wzdelete.bmp 20 wzedit.bmp 26 wzend.bmp 32 wzlocate.bmp 38 wznew.bmp 44 wznext.bmp 50 wzsave.bmp 56 wztop.bmp 62 wzundo.bmp 68 wzclose.msk 74 wzdelete.msk 77 wzedit.msk 80 wzlocate.msk 83 wznew.msk 86 wzsave.msk 89 wzprint.bmp 92 wzprint.msk 98 333330 333330 333330 333330 333330 333330 333330 DDDOD 333333 SCREEN WSTYLE STYLEDESC SCRNFILE SCRNNUM LABEL1 LABEL2 MESSAGE BMPFILE BWBMPFILE PICTURE WFILE PREPROC POSTPROC TITLE pickfield wiz_2 2Available Fields: Selected Fields: 8QF_FLD.BMP BWQF_FLD.BMP Screen Wizard - Step 2 of 5 style Standard Standard wiz_3 4Select a style: Select a button type: 10QF_STY1.BMP BWSTNDRD.BMP wz_s1defaddbmps addcode Screen Wizard - Step 4 of 5 style Chiseled Chiseled wiz_3 4Select a style: Select a button type: 13QF_STY2.BMP BWCHISEL.BMP wz_s2defaddbmps addcode Screen Wizard - Step 4 of 5 style Shadowed Shadowed wiz_3 4Select a style: Select a button type: 16QF_STY3.BMP BWSHADOW.BMP wz_s3defaddbmps addcode Screen Wizard - Step 4 of 5 style Boxed Boxed wiz_3 4Select a style: Select a button type: 19QF_STY4.BMP BWBOXED.BMP wz_s4defaddbmps addcode Screen Wizard - Step 4 of 5 end wiz_5 6Enter a title for your screen: Your screen is finished. 22 Screen Wizard - Step 5 of 5 style Embossed Embossed wiz_3 4Select a screen style: Select a buttons type: 23QF_STY5.BMP BWEMBOSS.BMP wz_s5defaddbmps addcode Screen Wizard - Step 4 of 5 sort wiz_6 3Available Fields: Sort Order of Records: 26SORT.BMP BWQF_FLD.BMP Screen Wizard - Step 3 of 5 button wiz_edit 5Select a method for storing input fields: 29 Screen Wizard - Step 4b of 5 table wiz_1b 1Select a table: 30OPENTABL.BMP BWQF_FLD.BMP Screen Wizard - Step 1 of 5 \Which fields do you want to include? Select each field you want and click the Add button. :Which style and button type do you want for your screen? First, select an overall style for the screen. Then, choose a style for the record navigation and editing buttons. 8Which style and button type do you want for your screen? First, select an overall style for the screen. Then, choose a style for the record navigation and editing buttons. 8Which style and button type do you want for your screen? First, select an overall style for the screen. Then, choose a style for the record navigation and editing buttons. 8Which style and button type do you want for your screen? First, select an overall style for the screen. Then, choose a style for the record navigation and editing buttons. (Select an option below and click Finish. Which style and button type do you want for your screen? First, select an overall style for the screen. Then, choose a style for the record navigation and editing buttons. By which fields do you want to sort the records? Select each field you want to sort by and click the Add button. (Select up to 3 fields.)ds.) 1How do you want to store input field information? Which table do you want to use? WZMAINFF Wizard must be called from WIZARD.APP IPROGCNT LISGOOD WIZ_3 STANDARD WIZ_3 BWSTNDRD.BMP QF_STY1.BMP bwtxtbtn.bmp bwpicbtn.bmp8 textbtns.bmp pictbtns.bmp8 wizpix WIZ_SCRN WIZ_3.SPR WIZ_3 ISTYLEITEMWZASTYARR WZTMPDESC SCRNFILE WSTYLE WZ_SPECS WIZPIX STYLEDESC BWBMPFILE WZSBMPFILEBMPFILE LEWZSBTNFILEWZIBUTTONSI ASTYARR CLREGN TEMWIZ_3 WIZ_3 BWSTNDRD.BMP QF_STY1.BMP wiz_pic.spr ISTYLEITEMSCRNFILE MSTYLEDESC WZASTYARR WZTMPDESC WIZPIX BWBMPFILE WZSBMPFILEBMPFILE LEWIZ_PIC LESPR bwtxtbtn.bmp textbtns.bmp bwpicbtn.bmp pictbtns.bmp wiz_pic.spr WZIBUTTONSWZSBTNFILEWIZ_PIC LESPR TYARR STYLEVAL VBUTTONS TALKz COMPATIBLEz wiz_scrn WIZ_SCRN WIZ_SCRN.PJX WIZ_SCRN WIZ_SCRN.SCX WIZ_SCRN WIZ_SCRN.MNX WIZ_SCRN WIZ_SCRN.PRG WIZ_SCRN WIZ_SCRN.FRX WIZ_SCRN WIZ_SCRN.QPR wiz_obj.spr wiz_scrn @ 10,19 GET m.iStyleitem PICTURE "@&N" FROM wzaStyarr SIZE 6,29 DEFAULT 1 WHEN styleval() COLOR SCHEME 16 wiz_btns.spr wiz_scrn wiz_scrn TALKz COMPATIBLEz READBORDERz wiz_scrn WIZ_SCRN WIZ_SCRN.PJX WIZ_SCRN WIZ_SCRN.SCX WIZ_SCRN WIZ_SCRN.MNX WIZ_SCRN WIZ_SCRN.PRG WIZ_SCRN WIZ_SCRN.FRX WIZ_SCRN WIZ_SCRN.QPR Geneva wiz_scrn Geneva Geneva Geneva Geneva Geneva |?U9@ @ 13.308,2.000 GET m.iStyleitem PICTURE "@&N3" FROM wzaStyarr SIZE 4.667,27.400 DEFAULT 1 FONT "Geneva", 9 WHEN styleval() Geneva @*RVN3 Text;Picture Geneva @*HN3 \?\<Cancel wiz_scrn Geneva @*HT3 < \<Back Geneva @*HT3 \<Next > Geneva @*HT3 \<Finish wiz_scrn wiz_scrn SET READBORDER &rborder TALKz COMPATIBLEz READBORDERz wiz_scrn WIZ_SCRN WIZ_SCRN.PJX WIZ_SCRN WIZ_SCRN.SCX WIZ_SCRN WIZ_SCRN.MNX WIZ_SCRN WIZ_SCRN.PRG WIZ_SCRN WIZ_SCRN.FRX WIZ_SCRN WIZ_SCRN.QPR MS Sans Serif wiz_pic.spr wiz_obj.spr wiz_scrn MS Sans Serif MS Sans Serif 3333332@ MS Sans Serif MS Sans Serif |?U9@ @ 13.308,2.200 GET m.iStyleitem PICTURE "@&N" FROM wzaStyarr SIZE 4.615,27.400 DEFAULT 1 FONT "MS Sans Serif", 8 WHEN styleval() MS Sans Serif @*RVN Text;Picture wiz_btns.spr wiz_scrn wiz_scrn SET READBORDER &rborder WZSCRNTITLWIZPIX TITLE CURRAREA TALKSTAT COMPSTAT WIZ_SCRN DO_IT TITLLABEL1 EXITWIZ _QO51B58WHRBORDER MESSAGE LABEL2 WZIBUTTONSVBUTTONS WZICANBTN WZIBACKBTNWZINEXTBTNWZIENDBTN WZSBMPFILEWZSBTNFILE_QO51B59HJWIZ_PIC _QO51B5A2Y@ CURRWIND LWZ_SHOW WIZ_SCRN CURRWIND LWZ_SHOW WIZ_SCRN WZSBMPFILEWZSBTNFILE WIZ_SCRN 3333332@ CURRWIND LWZ_SHOW WIZ_SCRN WZSBTNFILE_QO51B58WH _QO51B59HJ _QO51B5A2Y wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp xwwpp wwwwwwwwwwwwww wwwww xwwpp wwwwww wwwwwwww wwwwwww wwwwwww xwwpp wwwwww xwwpp wwwwwwwwwwwwwwwwwwwwwwwww p;wpw wwwwwwwwwwx wwwwwwwwww wwwwwwwwwww wwwwwwwwwwwx wwwwwww wwwwwww wwwwwwww wwwwwwwwx wwwww wwwww wwwwwwwwwwwwwww wwwwwwwwwwwwwwwx wwwwwwwwwwwwww pwwwwwwwwwwwwwww wwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwww wpwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwp wwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwp wwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp xwwpp wwwwwwwwwwwwww wwwww xwwpp wwwwww wwwwwwww wwwwwww wwwwwww xwwpp wwwwww xwwpp wwwwwwwwwwwwwwwwwwwwwwwww p;wpw wwwwwwwwwwx wwwwwwwwww wwwwwwwwwww wwwwwwwwwwwx wwwwwww wwwwwww wwwwwwww wwwwwwwwx wwwww wwwww wwwwwwwwwwwwwww wwwwwwwwwwwwwwwx wwwwwwwwwwwwww pwwwwwwwwwwwwwww wwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwww wpwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwp wwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwp wwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp xwwpp wwwwwwwwwwwwww wwwww xwwpp wwwwww wwwwwwww wwwwwww wwwwwww xwwpp wwwwww xwwpp wwwwwwwwwwwwwwwwwwwwwwwww p;wpw wwwwwwwwww wwwwwwwwww wwwwwwwwwwx wwwwwwwwww wwwwwwwwwww wwwwwwwwwwwx wwwwwww wwwwwww wwwwwwwwwwwwwwww wwwwwwwwwwwwwwww wwwwwwww wwwwwwwwx wwwww wwwww wwwwwwwwwwwwwww wwwwwwwwwwwwwwwx wwwwwwwwwwwwww pwwwwwwwwwwwwwww wwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwww wpwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwp wwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwp wwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp xwwpp wwwwwwwwwwwwww wwwww xwwpp wwwwww wwwwwwww wwwwwww wwwwwww xwwpp wwwwww xwwpp wwwwwwwwwwwwwwwwwwwwwwwww p;wpw wwwwwwwwwwx wwwwwwwwww wwwwwwwwwww wwwwwwwwwwwx wwwwwww wwwwwww wwwwwwww wwwwwwwwx wwwww wwwww wwwwwwwwwwwwwww wwwwwwwwwwwwwwwx pwDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD tDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD@w wwwwwwwwwwwwww tDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD@pwwwwwwwwwwwwwww wDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD wtDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD tDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD@w DDDDDDDDDDD DHDHHDHHDHHDHHDHHDDDDDDDDDDDD DDDDDDDDDDD@w DDDDDDDDDDD wwpOOOOOO@ DDHHDHHDHHDHHDHHDDDDDDDDDD@w OOOOOOOOOOOOOOOOOOOOOOO DDDDDDDDD wwpOOO wxDDDDDDDDDDDDDDDDDDDDDDDD@w OOOOO@ DDDDDDDDDDDDDDDDDDDDDDD wwpOOOOOOOO@ wDDDDDDDDDDDDDDDDDDDDDDD@w OOOOOOOOOOOOOOOOOOOOOOOOO wtDDDDDDDDDDDDDDDDDDDDDD wwpOOOOOOOOO@ wDDDDDDDDDDDDDDDDDDDDD@w OOOOOOOOOOOOOOOOOOOOOOOOOO wtDDDDDDDDDDDDDDDDDDDD wwwwwwwwwwwwwp pwtDDDDDDDDDDDDDDDDDD wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwww wwDDDDDDDDDDDDDDDD wpwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwww wwtDDDDDDDDDDDDD wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwp wwwwDDDDDDDDDD wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwp wwwwwDDDwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwp wwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp xwwpp xwwpp wwwwwwwwwwwwww wwxooooogwww wwwww ooooooooooooooooooooooooooooo xwwpp wwwwhgwwp wwwwww wwwwwwwwogwwwwwwwo wwwwwwwooooo xwwpp wwwwww ooooo xwwpp fffffffo ffffffffffff ooooo ffffffffffffffo fffffffffffffffff wwoooooooooooooooooooooooo fffffffffffffffffff pffffffffffffffffffffo wwwwwwwwwwwwwwwwwwwwwwwww p;wpw fffffffffffffffffffffo pfffffffffffffffffffffff wwoooooooooooooooooooooo fffffffffffffffffffffffo wwpoo pfffffffffffffffffffffffff wwooooooooooooooooooooo fffffffffffffgwwwwwwwwwww wwpooo pffffffffffffff` oooooooooooooooooooo ffffffffffffff` wwwwwwwwwwv wwpooo`3x wwwwwwwwww oooooooooo wwpoooo pfff`fff wwooooooooooooooooooo ff`ff f`fff` wwpoooo`w ffff`f`f oooooooooooooooooo pffffff wwpoooo pffff f`ffffffffff` wwwwwwwwwww oooooooo ffffffffff` wwwwwwwwwwwv wwpooo`w fffffffffffffffff` woooooooooooooooooo pffffffffffffffffff` wwpooo pffffffffffffffffff` ooooooooooooooooo fffffffffffffffffffffffffffffffffffo wwpooo fffffffffffffffffffffffffffffffffffo ooooooooooooooooo ffffffffffffffffffffffffffffffffffff wwwwwww wwpoo`pfffffffffffffffffffffffffffffffffffff wwwwwwwoooooooooooo pfffffffffffffffffffffffffffffffffffffo wwpoo`pfffffffffffffffffffgwwwwwwwwwwwwwwwww wooooooooooooooooo pfffffffffffffffffff` wwpoo pfffffffffffffffffff` wooooooooooooooooo fffffffffffffffffff` wwpoo wwwwwwww ooooooooo wwwwwwwwv wwpoo wooooooooooooooooo fff`f`f` wwpoo wooooooooooooooooo wwpoo ffff`ffffffffffffff` wooooooooooooooooo ffff`ffffffffffffff` wwwww wwpoo fffffffffffffffffff` wwwwwooooooooooooo fffffffffffffffffff` wwpoo pvfffffffffffffffffffffffffffffffffffff ooooooooooooooooo pvfffffffffffffffffffffffffffffffffffff wwpoo`pvfffffffffffffffffffffffffffffffffffff woooooooooooooooooo pvfffffffffffffffffffffffffffffffffffff wwpoo` wfffffffffffffffffffffffffffffffffffff wwwwwwwwwwwwwww pwfffffffffffffffffffffffffffffffffffff wwwwwwwwwwwwwwwv wwpooo ffffffffffffffffffffffffffffffffffff`pw oooooooooooooooooo ffffffffffffffffffffffffffffffffffff`pwv wwpooo vfffffffffffffffffffffffffffffffffff`pwooooooooooooooooooo wwpooo`pwfffffffffffffffffffffffffffffffffff ooooooooooooooooooo vfffffffffffffffffffffffffffffffff`w wwwwwwwwwwwwww wwpoooo vfffffffffffffffffffffffffffffffff`pwwwwwwwwwwwwwwwoooooo wfffffffffffffffffffffffffffffffff wwpoooo` wvffffffffffffffffffffffffffffffff oooooooooooooooooooo vfffffffffffffffffffffffffffffff`w wwpooooo fffffffffff ooooooooooooooooooooo f`f``f``f``f``f``ffffffffffff fffffffffff`w fffffffffff wwpoooooo` ff``f``f``f``f``ffffffffff`w ooooooooooooooooooooooo fffffffff wwpooo ffffffffffffffffffffffff`w ooooo` fffffffffffffffffffffff wwpoooooooo` wfffffffffffffffffffffff`w ooooooooooooooooooooooooo wvffffffffffffffffffffff wwpooooooooo` wfffffffffffffffffffff`w oooooooooooooooooooooooooo wvffffffffffffffffffff wwwwwwwwwwwwwp pwvffffffffffffffffff wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwww wwffffffffffffffff wpwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwww wwvfffffffffffff wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwp wwwwffffffffff wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwp wwwwwfffwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwp wwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwww wwwwwwww wwwwwwww wwwwwwww wwwwwwww wwwwwwww wwwwwwww wwwwwwww wwwwwwww wwwwwwww wwwwwwww wwwwwwww wwwwwwww wwwwwwww wwwwwwx wwwwwwx wwwwwww wwwwwwx wwwwwwx wwwwwwwwwwww wwwwwwx wwwwwwx wwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwww wwwwwwwwwwwwwww wwwwwwwwwwwwww wwwwwwwwwwwwww wwwpwww wwpww wpwww wwwwpwpw wwwwww wpwwwwwwwwww wwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwww wwwpwpwp wwwwpwwwwwwwwwwwwww wwwwpwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwww wpwppwppwppwppwppwwwwwwwwwwww wwwwwwwwwwwp wwwwwwwwwww wwppwppwppwppwppwwwwwwwwwwp wwwwwwwww pwwwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwp wwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwww wwwwwwwwwwwww wwwwwwwwww wwwwp wwwwwwwwwwwwwwwwwwwwwww wwwwx wwwwp wwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwww wwwwp wwwwwwwwwwwwwwwwwwwwwww wwwwp wwwwwww pwppwwwwwww wwwwp wwwwwww wwwwwww wwwwx wwwwwww wwwwwww wwwwp wwwwwww wwwwwww wwwwp wwwwwww wwwwwww wwwwwww wwwww wwwwwww wwwwp wwwwwww wwwwwwwwwwwww wwwwp wwwwwwwwwwwwwwwwwwwwwww wwwwx wwwwp wwwwwwwwwwwwwwwwwwwwwww wwwwp wwwwwwwwwwwwwwwwwwwwwww wwwwx BOXED wzmemofldF wzcboxF wzfieldF nooffF wzlabel2F column2F wzlabel1F upperF lowerF wzfooterF inheadF .TMPFF wz_newwiz SKIPz wz_newwiz wz_newwiz wzborderF wz_newwiz postfldF wzprefxF wz_newwiz wzfxF postfldF wzborderF wzfooterF txtbuttonF inheadF wz_newwiz BOXED IHINC IVINC ITPOS IMPOS ILASTPOS WZILBLWID WZIFLDWID IDEFLBLWIDWZSCOLON WZILBLLEN LNOOFFSET WZIMAXFX WZIMAXLBL WZIMAXFLD WZATMPARR WZAARRAY WZAREC WZLHASENVILISNEWCOL SSAVEDBF LCALCFLD ICALCPOS WZLHASALIAWZ_SPECS IWZTMPARR WZTMPCURS OBJTYPE WZ_MAXW WIDTH WZ_MAXH HEIGHT OBJCODE COMMENT WZ_MHEIGHTWZ_MWIDTH WZ_FVPOS WZ_FHPOS WZ_FWIDTH WZ_L2VPOS WZ_COL2POSWZ_LVPOS SWZ_LHPOS WZ_V2OFFSEWZ_VOFFSETWZ_HOFFSETI MMENT WZ_FIELDS WZ_FLIST UPDSTATUS WZTMPSTR WZ_MARGIN WZ_XSMARGIWZ_IS1COL WZ_TESTVPOGETVOFF POWZTBLARR OTSTAMP WZSSAVEFILGETTAG ATMPARR WZIEDITTYPWZ_STYLE AADDHEADER ACOLSCAN WZ_FCALC WZ_ALERT WZATEXT GETHPOS GETVPOS GETWIDTH GETPICTUREWZIBUTTONSADDLBLS ADDFX GETHOFF WZ_NEWWIZ GROUPBOXES IGETHEIGHTWZ_FLIST WZ_V2OFFSEWZ_MHEIGHT GETVOFF NEWPOS GHTT1 FLIST V2OFFSEIHINC IGHTIVINC IGHTLISNEWCOL GETHEIGHT ILASTPOS IMPOS GETHOFF WZ_IS1COL FLIST WZ_FIELDS IHINC IGHTWZIMAXFX TWZIMAXLBL WZIMAXFLD WZ_COL2POSIS2COL2LONLISNEWCOL WZ_LHPOS wzheaderF titleF upperF lowerF properF wz_newwiz wzheadfxF hstretchF floatF wz_newwiz MYTITLE STTWID MYTITLEWD STTHPOS COMMENT HTWZATMPARR OBJTYPE WZ_SPECS TSTAMP skipmemoF skiplogicF nomacF tietolblF vstretchF aboveF hstretchF hstretchF floatF floatF BOXED wz_newwiz CCONTENTS SVWIDTH SVVPOS TLBLWIDTH WZ_FLIST IMPOS COMMENT WZLBLSTR WZ_FIELDS SNEWCOL WZSCOLON WZ_FVPOS WZ_MHEIGHTLNOOFFSET WZILBLWID WZ_LHPOS WZ_HOFFSETWZ_FHPOS WZ_FWIDTH IHINC TSTAMP WZ_SPECS AWZTMPCURS WZIMAXFX leftF wz_newwiz WZLARR WZLBLSTR WZ_FIELDS WZSCOLON WZ_LVPOS IVINC COMMENT IHINC IDEFLBLWIDTSTAMP WZIMAXLBL nooffF nooffF IGETHPOS COMMENT WZ_FLIST IMPOS WZ_FHPOS WZILBLWID WZ_LHPOS WZ_HOFFSETIHINC IGETVPOS WZ_FLIST IMPOS WZ_VOFFSETWZ_LVPOS IVINC 99/99/99@ ARRPOS IGETWIDTH WZ_FLIST WZ_MWIDTH mac3dF "@*C3 " "@*C "8 mac3dF "@3K "@K 8 mac3dF "@3K "@K 8 mac3dF "@3K" "@K"8 SGETPICTURSBASE WZ_FLIST IMPOS COMMENT URGETNUMSTR WZAARRAY BOXED IARRPOS URITMPWIDTH _FLIST WZ_FIELDS ITPOS URWZ_FLIST GETWIDTH WZ_SPECS RWZ_MAXW TWZ_COL2POSWZ_LHPOS WZILBLWID WZ_HOFFSET NUMCHARS RSGETNUMSTRZ ETNUMSTR CHR(195) CHR(194) CHR(193) CHR(180) CHR(193) CHR(197) CHR(193) CHR(194) CHR(180) CHR(197) CHR(194) CHR(194) CHR(193) CHR(180) wz_newwizQ WZTMPCURS WZATMPARR TSTAMP OBJTYPE WZLASTREC WZLASTVPOSVPOS WZLASTHPOSHPOS TWZLASTWID WIDTH WZLASTHI HEIGHT SETWZSKCNT WZ_IS1COL WZ_NEWWIZ WZTMPCNT SSAVEDBF GETHEIGHT GETVOFF GETHOFF ADDHEADER ADDFX ADDLBLS GETHPOS GETVPOS GETWIDTH GETPICTURE IS2COL2LON GETNUMSTR GROUPBOXES PLATFORM UNIQUEID TIMESTAMP OBJTYPE OBJCODE HEIGHT WIDTH STYLE PICTURE ORDER UNIQUE COMMENT ENVIRON BOXCHAR FILLCHAR PENRED PENGREEN PENBLUE FILLRED FILLGREEN FILLBLUE PENSIZE PENPAT FILLPAT FONTFACE FONTSTYLE FONTSIZE RULER RULERLINES GRIDV GRIDH SCHEME SCHEME2 COLORPAIR LOTYPE RANGELO HITYPE RANGEHI WHENTYPE VALIDTYPE VALID ERRORTYPE ERROR MESSTYPE MESSAGE SHOWTYPE ACTIVTYPE ACTIVATE DEACTTYPE DEACTIVATE PROCTYPE PROCCODE SETUPTYPE SETUPCODE FLOAT CLOSE MINIMIZE BORDER SHADOW CENTER REFRESH DISABLED SCROLLBAR ADDALIAS INITIALVAL INITIALNUM SPACING CURPOS DOS _QE30Y8YVJ 462790836 1 63 0.000 0.000 23.000 74.000 1 T 16 5 6 1 1 1 1 0 171 1 T T1TT T DOS _QEC145SW0 443979142 2 1 18 T 19 DOS _QE30YC4N1 443705105 5 0 20 0.000 2.000 1.000 5.000 21 0 DOS _QE30YCJ0C 444100024 7 4 1.000 0.000 1.000 72.000 22 0 DOS _QE5114T0H 443705028 5 0 23 0.000 25.000 1.000 15.000 GR+/B DOS _QE5116J24 444032845 7 4 8.000 11.000 9.000 42.000 0 DOS _QE5116N3E 443705043 5 0 24 8.000 13.000 1.000 16.000 0 DOS _QEB17DO5T 444100028 7 4 19.000 0.000 1.000 72.000 25 0 DOS _QE3120O9Q 44410000715 1 26 3.000 9.000 1.000 17.000 28 27 C 0 1 1 0 291 1 1 FFF F 0 DOS _QE311ZVLZ 44410001115 2 30 10.000 15.000 4.000 36.000 32 31 C 0 1 1 0 331 1 1 FFT F 0 DOS _QE310QBJ7 46272855914 1 34 15.000 15.000 1.000 5.000 36 35 0 0 371 1 F 0 DOS _QEC144R6M 44397911615 0 38 3.000 32.000 1.000 12.000 40 39 C 0 1 1 1 1 1 1 FFF F 0 DOS _QJD0LA38B 45688353412 1 41 20.000 0.000 1.000 5.000 43 42 0 0 1 1 1 0 44 0 45 F 46 1 1.000 DOS _QJD0LD4DB 45688352412 1 47 20.000 6.000 1.000 6.000 49 48 0 0 1 1 1 0 50 0 51 F 52 1 1.000 DOS _QJD0LDNBZ 45688352812 1 53 20.000 13.000 1.000 6.000 55 54 0 0 1 1 1 0 56 0 57 F 58 1 1.000 DOS _QJD0LE3M8 45688350812 1 59 20.000 20.000 1.000 5.000 61 60 0 0 1 1 1 0 62 0 63 F 64 1 1.000 DOS _QJD0LFIJC 45688350312 1 65 20.000 26.000 1.000 8.000 67 66 0 0 1 1 1 0 68 0 69 F 70 1 1.000 DOS _QJD0LFYWL 45688354212 1 71 20.000 35.000 1.000 5.000 73 72 0 0 1 1 1 0 74 0 75 F 76 1 1.000 DOS _QJD0LGDO7 45688354912 1 77 20.000 41.000 1.000 6.000 79 78 0 0 1 1 1 0 80 0 81 F 82 1 1.000 DOS _QJD0LGTKA 45688355612 1 83 20.000 48.000 1.000 8.000 85 84 0 0 1 1 1 0 86 0 87 F 88 1 1.000 DOS _QJD0LH85A 45688332512 1 89 20.000 57.000 1.000 7.000 91 90 0 0 1 1 1 0 92 0 93 F 94 1 1.000 DOS _QJD0LHS6B 45688330112 1 95 20.000 65.000 1.000 7.000 97 96 0 0 1 1 1 0 98 0 99 F 100 1 1.000 DOS _QLY0YILRL 462782670 5 0 101 3.000 2.000 1.000 6.000 102 0 DOS _QLY0YJ16Z 462782680 5 0 103 5.000 2.000 1.000 6.000 104 0 DOS _QN213GPZ0 47404891414 1 105 0.000 59.000 1.000 11.000 107 106 0 1 0 108 1 F 0 "Screen Name" readdeac() ..\OFFICES.DBF OFFICES "TITLE" wzheader title wzheader "Standard Style " "Default Objects:" wzfooter field wzfield isediting standard wzmemofld isediting m.wzckdummy wzcbox "@*C " isediting column2 column2 m.top_btn wzfooter txtbutton "@*HN \<Top" btn_val('TOP') 'Go to first record.' "Top"% m.prev_btn wzfooter txtbutton "@*HN \<Prev" btn_val('PREV') 'Go to previous record.' "Prev" m.next_btn wzfooter txtbutton "@*HN \<Next" btn_val('NEXT') 'Go to next record.' "Next" m.end_btn wzfooter txtbutton "@*HN \<End" btn_val('END') 'Go to last record.' "End" m.loc_btn wzfooter txtbutton "@*HN \<Locate" btn_val('LOCATE') 'Locate a record.' "Locate" m.add_btn wzfooter txtbutton "@*HN \<Add" btn_val('ADD') 'Add a new record.' "Add" m.edit_btn wzfooter txtbutton "@*HN Ed\<it" btn_val('EDIT') 'Edit current record.' "Edit" m.del_btn wzfooter txtbutton "@*HN \<Delete" btn_val('DELETE') 'Delete current record.' "Delete" m.prnt_btn wzfooter txtbutton "@*HN P\<rint" btn_val('PRINT') 'Print report.' "Print" m.exit_btn wzfooter txtbutton "@*HN \<Close" btn_val('EXIT') 'Close screen.' "Close" "label1" wzlabel1 : "label2" wzlabel2 m.find_drop findcbox "@*C \<Find..." findval()$ "Screen Name" readdeac() ..\OFFICES.DBF OFFICES "TITLE" wzheader title wzheader "Standard Style " "Default Objects:" wzfooter field wzfield isediting standard wzmemofld isediting m.wzckdummy "@*C " wzcbox isediting column2 column2 m.top_btn "@*HN \<Top" wzfooter txtbutton btn_val('TOP') 'Go to first record.' "Top" m.prev_btn "@*HN \<Prev" wzfooter txtbutton btn_val('PREV') 'Go to previous record.' "Prev" m.next_btn "@*HN \<Next" wzfooter txtbutton btn_val('NEXT') 'Go to next record.' "Next" m.end_btn "@*HN \<End" wzfooter txtbutton btn_val('END') 'Go to last record.' "End" m.loc_btn "@*HN \<Locate" wzfooter txtbutton btn_val('LOCATE') 'Locate a record.' "Locate" m.add_btn "@*HN \<Add" wzfooter txtbutton btn_val('ADD') 'Add a new record.' "Add" m.edit_btn "@*HN Ed\<it" wzfooter txtbutton btn_val('EDIT') 'Edit current record.' "Edit" m.del_btn "@*HN \<Delete" wzfooter txtbutton btn_val('DELETE') 'Delete current record.' "Delete" m.prnt_btn "@*HN P\<rint" wzfooter txtbutton btn_val('PRINT') 'Print report.' "Print" m.exit_btn "@*HN \<Close" wzfooter txtbutton btn_val('EXIT') 'Close screen.' "Close" "label1" wzlabel1 : "label2" wzlabel2 m.find_drop "@*C \<Find..." findval() PLATFORM UNIQUEID TIMESTAMP OBJTYPE OBJCODE HEIGHT WIDTH STYLE PICTURE ORDER UNIQUE COMMENT ENVIRON BOXCHAR FILLCHAR PENRED PENGREEN PENBLUE FILLRED FILLGREEN FILLBLUE PENSIZE PENPAT FILLPAT FONTFACE FONTSTYLE FONTSIZE RULER RULERLINES GRIDV GRIDH SCHEME SCHEME2 COLORPAIR LOTYPE RANGELO HITYPE RANGEHI WHENTYPE VALIDTYPE VALID ERRORTYPE ERROR MESSTYPE MESSAGE SHOWTYPE ACTIVTYPE ACTIVATE DEACTTYPE DEACTIVATE PROCTYPE PROCCODE SETUPTYPE SETUPCODE FLOAT CLOSE MINIMIZE BORDER SHADOW CENTER REFRESH DISABLED SCROLLBAR ADDALIAS INITIALVAL INITIALNUM SPACING CURPOS DOS _QE30Y8YVJ 462791699 1 63 0.000 0.000 23.000 76.000 1 T 16 8 9 1 1 1 1 0 171 1 T T1TT T DOS _QEC145SW0 443979142 2 1 18 T 19 DOS _QLY1831LL 462791752 7 4 0.000 0.000 3.000 74.000 20 B/B DOS _QE30YC4N1 443705105 5 0 21 1.000 3.000 1.000 5.000 22 W+/B DOS _QE5114T0H 443705028 5 0 23 1.000 26.000 1.000 15.000 W+/B DOS _QE5116J24 444032845 7 4 8.000 11.000 9.000 42.000 0 DOS _QE5116N3E 443705043 5 0 24 8.000 13.000 1.000 16.000 0 DOS _QEB17DO5T 462791733 7 4 18.000 0.000 3.000 74.000 25 B/B DOS _QE3120O9Q 46279179015 1 26 5.000 2.000 1.000 17.000 28 27 C 0 1 1 0 291 1 1 FFF F 0 DOS _QE311ZVLZ 46279178115 2 30 10.000 15.000 4.000 36.000 32 31 C 0 1 1 0 331 1 1 FFT F 0 DOS _QE310QBJ7 46279178414 1 34 15.000 15.000 1.000 5.000 36 35 0 0 371 1 F 0 DOS _QEC144R6M 44397911615 0 38 4.000 33.000 1.000 12.000 40 39 C 0 1 1 1 1 1 1 FFF F 0 DOS _QJD0LA38B 45688353412 1 41 19.000 1.000 1.000 5.000 43 42 1 0 1 1 1 0 44 0 45 F 46 1 1.000 DOS _QJD0LD4DB 45688352412 1 47 19.000 7.000 1.000 6.000 49 48 1 0 1 1 1 0 50 0 51 F 52 1 1.000 DOS _QJD0LDNBZ 45688352812 1 53 19.000 14.000 1.000 6.000 55 54 1 0 1 1 1 0 56 0 57 F 58 1 1.000 DOS _QJD0LE3M8 45688350812 1 59 19.000 21.000 1.000 5.000 61 60 1 0 1 1 1 0 62 0 63 F 64 1 1.000 DOS _QJD0LFIJC 45688350312 1 65 19.000 27.000 1.000 8.000 67 66 1 0 1 1 1 0 68 0 69 F 70 1 1.000 DOS _QJD0LFYWL 45688354212 1 71 19.000 36.000 1.000 5.000 73 72 1 0 1 1 1 0 74 0 75 F 76 1 1.000 DOS _QJD0LGDO7 45688354912 1 77 19.000 42.000 1.000 6.000 79 78 1 0 1 1 1 0 80 0 81 F 82 1 1.000 DOS _QJD0LGTKA 45688355612 1 83 19.000 49.000 1.000 8.000 85 84 1 0 1 1 1 0 86 0 87 F 88 1 1.000 DOS _QJD0LH85A 45688332512 1 89 19.000 58.000 1.000 7.000 91 90 1 0 1 1 1 0 92 0 93 F 94 1 1.000 DOS _QJD0LHS6B 45688330112 1 95 19.000 66.000 1.000 7.000 97 96 1 0 1 1 1 0 98 0 99 F 100 1 1.000 DOS _QLY0YILRL 462791823 5 0 101 4.000 2.000 1.000 6.000 102 B/BG DOS _QLY0YJ16Z 462782680 5 0 103 7.000 2.000 1.000 6.000 104 0 DOS _QLY180NVB 462791811 7 4 3.000 1.000 4.000 19.000 105 0 DOS _QN213I4Y4 47404892114 1 107 1.000 61.000 1.000 11.000 109 108 1 1 0 110 1 F 0 "Screen Name" readdeac() ..\OFFICES.DBF OFFICES wzheader "TITLE" wzheader title "Standard Style " "Default Objects:" wzfooter field wzfield nooff isediting standard wzmemofld nooff isediting m.wzckdummy wzcbox nooff "@*C " isediting column2 column2 m.top_btn wzfooter txtbutton "@*HN \<Top" btn_val('TOP') 'Go to first record.' "Top"% m.prev_btn wzfooter txtbutton "@*HN \<Prev" btn_val('PREV') 'Go to previous record.' "Prev" m.next_btn wzfooter txtbutton "@*HN \<Next" btn_val('NEXT') 'Go to next record.' "Next" m.end_btn wzfooter txtbutton "@*HN \<End" btn_val('END') 'Go to last record.' "End" m.loc_btn wzfooter txtbutton "@*HN \<Locate" btn_val('LOCATE') 'Locate a record.' "Locate" m.add_btn wzfooter txtbutton "@*HN \<Add" btn_val('ADD') 'Add a new record.' "Add" m.edit_btn wzfooter txtbutton "@*HN Ed\<it" btn_val('EDIT') 'Edit current record.' "Edit" m.del_btn wzfooter txtbutton "@*HN \<Delete" btn_val('DELETE') 'Delete current record.' "Delete" m.prnt_btn wzfooter txtbutton "@*HN P\<rint" btn_val('PRINT') 'Print report.' "Print" m.exit_btn wzfooter txtbutton "@*HN \<Close" btn_val('EXIT') 'Close screen.' "Close" "label1" wzlabel1 : postfld left "label2" wzlabel2 "wzprefx hstretch vstretch tietolbl m.find_drop findcbox "@*C \<Find..." findval() SCREEN WSTYLE STYLEDESC SCRNFILE SCRNNUM LABEL1 LABEL2 MESSAGE BMPFILE BWBMPFILE PICTURE WFILE PREPROC POSTPROC TITLE pickfield wiz_2 2Available Fields: Selected Fields: 8QF_FLD.BMP BWQF_FLD.BMP Screen Wizard style Standard Standard wiz_3 4Select a style: Select a button type: 10QF_STY1.BMP BWSTNDRD.BMP wz_s1dosaddbmps addcode Screen Wizard style Chiseled Chiseled wiz_3 4Select a style: Select a button type: 13QF_STY2.BMP BWCHISEL.BMP wz_s3dosaddbmps addcode Screen Wizard style Boxed Boxed wiz_3 4Select a style: Select a button type: 16QF_STY4.BMP BWBOXED.BMP wz_s2dosaddbmps addcode Screen Wizard end wiz_5 6Enter a title for your screen: Your screen is finished. 19 Screen Wizard sort wiz_6 3Available Fields: Sort Order of Records: 20QF_FLD.BMP BWQF_FLD.BMP Screen Wizard button wiz_edit 5Select a method for storing input fields: 23 Screen Wizard table wiz_1b 1Select a table: 24QF_FLD.BMP BWQF_FLD.BMP Screen Wizard \Which fields do you want to include? Select each field you want and click the Add button. (Which style do you want for your screen?for your screen? First, select an overall style for the screen. Then, choose a style for the record navigation and editing buttons. *Which style do you want for your screen? r your screen? verall style for the screen. Then, choose a style for the record navigation and editing buttons. *Which style do you want for your screen? r your screen? verall style for the screen. Then, choose a style for the record navigation and editing buttons. (Select an option below and click Finish. By which fields do you want to sort the records? Select each field you want to sort by and click the Add button. (Select up to 3 fields.)ds.) 1How do you want to store input field information? Which table do you want to use? PLATFORM UNIQUEID TIMESTAMP OBJTYPE OBJCODE HEIGHT WIDTH STYLE PICTURE ORDER UNIQUE COMMENT ENVIRON BOXCHAR FILLCHAR PENRED PENGREEN PENBLUE FILLRED FILLGREEN FILLBLUE PENSIZE PENPAT FILLPAT FONTFACE FONTSTYLE FONTSIZE RULER RULERLINES GRIDV GRIDH SCHEME SCHEME2 COLORPAIR LOTYPE RANGELO HITYPE RANGEHI WHENTYPE VALIDTYPE VALID ERRORTYPE ERROR MESSTYPE MESSAGE SHOWTYPE ACTIVTYPE ACTIVATE DEACTTYPE DEACTIVATE PROCTYPE PROCCODE SETUPTYPE SETUPCODE FLOAT CLOSE MINIMIZE BORDER SHADOW CENTER REFRESH DISABLED SCROLLBAR ADDALIAS INITIALVAL INITIALNUM SPACING CURPOS DOS _QE30Y8YVJ 462848353 1 63 0.000 0.000 23.000 74.000 1 T 16 1 2 1 1 1 1 0 171 1 T T1TT T DOS _QEC145SW0 443979142 2 1 18 T 19 DOS _QE30YC4N1 443705105 5 0 20 0.000 2.000 1.000 5.000 21 0 DOS _QE30YCJ0C 444100024 7 4 1.000 0.000 1.000 72.000 22 0 DOS _QE5114T0H 443705028 5 0 23 0.000 25.000 1.000 15.000 GR+/B DOS _QE5116J24 444032845 7 4 8.000 11.000 9.000 42.000 0 DOS _QE5116N3E 443705043 5 0 24 8.000 13.000 1.000 16.000 0 DOS _QEB17DO5T 444100028 7 4 19.000 0.000 1.000 72.000 25 0 DOS _QE3120O9Q 44410000715 1 26 3.000 9.000 1.000 17.000 28 27 C 0 1 1 0 291 1 1 FFF F 0 DOS _QE311ZVLZ 44410001115 2 30 10.000 15.000 4.000 36.000 32 31 C 0 1 1 0 331 1 1 FFT F 0 DOS _QE310QBJ7 46272855914 1 34 15.000 15.000 1.000 5.000 36 35 0 0 371 1 F 0 DOS _QEC144R6M 44397911615 0 38 3.000 32.000 1.000 12.000 40 39 C 0 1 1 1 1 1 1 FFF F 0 DOS _QJD0LA38B 45688353412 1 41 20.000 0.000 1.000 5.000 43 42 0 0 1 1 1 0 44 0 45 F 46 1 1.000 DOS _QJD0LD4DB 45688352412 1 47 20.000 6.000 1.000 6.000 49 48 0 0 1 1 1 0 50 0 51 F 52 1 1.000 DOS _QJD0LDNBZ 45688352812 1 53 20.000 13.000 1.000 6.000 55 54 0 0 1 1 1 0 56 0 57 F 58 1 1.000 DOS _QJD0LE3M8 45688350812 1 59 20.000 20.000 1.000 5.000 61 60 0 0 1 1 1 0 62 0 63 F 64 1 1.000 DOS _QJD0LFIJC 45688350312 1 65 20.000 26.000 1.000 8.000 67 66 0 0 1 1 1 0 68 0 69 F 70 1 1.000 DOS _QJD0LFYWL 45688354212 1 71 20.000 35.000 1.000 5.000 73 72 0 0 1 1 1 0 74 0 75 F 76 1 1.000 DOS _QJD0LGDO7 45688354912 1 77 20.000 41.000 1.000 6.000 79 78 0 0 1 1 1 0 80 0 81 F 82 1 1.000 DOS _QJD0LGTKA 45688355612 1 83 20.000 48.000 1.000 8.000 85 84 0 0 1 1 1 0 86 0 87 F 88 1 1.000 DOS _QJD0LH85A 45688332512 1 89 20.000 57.000 1.000 7.000 91 90 0 0 1 1 1 0 92 0 93 F 94 1 1.000 DOS _QJD0LHS6B 45688330112 1 95 20.000 65.000 1.000 7.000 97 96 0 0 1 1 1 0 98 0 99 F 100 1 1.000 DOS _QLY0YILRL 462782670 5 0 101 3.000 2.000 1.000 6.000 102 0 DOS _QLY0YJ16Z 462782680 5 0 103 6.000 2.000 1.000 6.000 104 0 DOS _QLZ0YEJXL 462848174 7 4 4.000 9.000 1.000 17.000 105 0 DOS _QN213J8XW 47404892914 1 106 0.000 59.000 1.000 11.000 108 107 0 1 0 109 1 F 0 "Screen Name" readdeac() ..\OFFICES.DBF OFFICES "TITLE" wzheader title wzheader "Standard Style " "Default Objects:" wzfooter field wzfield isediting standard wzmemofld isediting m.wzckdummy wzcbox "@*C " isediting column2 column2 m.top_btn wzfooter txtbutton "@*HN \<Top" btn_val('TOP') 'Go to first record.' "Top"% m.prev_btn wzfooter txtbutton "@*HN \<Prev" btn_val('PREV') 'Go to previous record.' "Prev" m.next_btn wzfooter txtbutton "@*HN \<Next" btn_val('NEXT') 'Go to next record.' "Next" m.end_btn wzfooter txtbutton "@*HN \<End" btn_val('END') 'Go to last record.' "End" m.loc_btn wzfooter txtbutton "@*HN \<Locate" btn_val('LOCATE') 'Locate a record.' "Locate" m.add_btn wzfooter txtbutton "@*HN \<Add" btn_val('ADD') 'Add a new record.' "Add" m.edit_btn wzfooter txtbutton "@*HN Ed\<it" btn_val('EDIT') 'Edit current record.' "Edit" m.del_btn wzfooter txtbutton "@*HN \<Delete" btn_val('DELETE') 'Delete current record.' "Delete" m.prnt_btn wzfooter txtbutton "@*HN P\<rint" btn_val('PRINT') 'Print report.' "Print" m.exit_btn wzfooter txtbutton "@*HN \<Close" btn_val('EXIT') 'Close screen.' "Close" "label1" wzlabel1 : "label2" wzlabel2 wzfx hstretch m.find_drop findcbox "@*C \<Find..." findval() "Screen Name" readdeac() ..\OFFICES.DBF OFFICES "TITLE" wzheader title wzheader "Standard Style " "Default Objects:" wzfooter field wzfield isediting standard wzmemofld isediting m.wzckdummy "@*C " wzcbox isediting column2 column2 m.top_btn "@*HN \<Top" wzfooter txtbutton btn_val('TOP') 'Go to first record.' "Top" m.prev_btn "@*HN \<Prev" wzfooter txtbutton btn_val('PREV') 'Go to previous record.' "Prev" m.next_btn "@*HN \<Next" wzfooter txtbutton btn_val('NEXT') 'Go to next record.' "Next" m.end_btn "@*HN \<End" wzfooter txtbutton btn_val('END') 'Go to last record.' "End" m.loc_btn "@*HN \<Locate" wzfooter txtbutton btn_val('LOCATE') 'Locate a record.' "Locate" m.add_btn "@*HN \<Add" wzfooter txtbutton btn_val('ADD') 'Add a new record.' "Add" m.edit_btn "@*HN Ed\<it" wzfooter txtbutton btn_val('EDIT') 'Edit current record.' "Edit" m.del_btn "@*HN \<Delete" wzfooter txtbutton btn_val('DELETE') 'Delete current record.' "Delete" m.prnt_btn "@*HN P\<rint" wzfooter txtbutton btn_val('PRINT') 'Print report.' "Print" m.exit_btn "@*HN \<Close" wzfooter txtbutton btn_val('EXIT') 'Close screen.' "Close" "label1" wzlabel1 : "label2" wzlabel2 wzfx hstretch m.find_drop "@*C \<Find..." findval() WIZ_BTNS WIZ_SCRN WZIBUTTONSWZSLASTBTNWZINEXTBTNWZIBACKBTNSCRNFILE CLREGN TALKz COMPATIBLEz READBORDERz wiz_pic.spr wiz_obj.spr wiz_scrn MS Sans Serif MS Sans Serif @*RVN Store in table fields with table name prefix (e.g., "cust.cno");Store to memory variables (e.g., "m.cno");Store in table fields, without a prefix (e.g., "cno");\\Store in an array wiz_btns.spr wiz_scrn wiz_scrn SET READBORDER &rborder CURRAREA TALKSTAT COMPSTAT RBORDER WIZ_SCRN WIZPIX TITLE WIZ_PIC DO_IT LABEL1 WZIEDITTYPEXITWIZ WZSBMPFILE QFORM\ADDBMPS.PRG C:\WIZARDS\ ADDBMPS.FXP QFORM\ADDCODE.PRG ADDCODE.FXP QFORM\WZ_QFORM.PRG C:\FPD26\ WZ_QFORM.FXP C:\WIZARDS\STYLES\ WZ_S1DEF.SCX WZ_S1DEF.SCT WZ_S2DEF.SCX WZ_S2DEF.SCT WZ_S3DEF.SCX WZ_S3DEF.SCT WZ_S4DEF.SCX WZ_S4DEF.SCT WZ_S5DEF.SCX WZ_S5DEF.SCT QFORM\WZ_SCRN.PRG WZ_SCRN.FXP C:\WIZARDS\QFORM\ SCXCODE.DBF SCXCODE.FPT WIZBMP.DBF WIZBMP.FPT WIZQFRM1.DBF WIZQFRM1.FPT WIZARD\CHKSRC.PRG CHKSRC.FXP QFORM\WIZ_3.PRG WIZ_3.FXP QFORM\WIZ_3.SPR WIZ_3.SPX C:\WIZARDS\BMP\ QF_STY1.BMP QF_STY1.MSK QF_STY2.BMP QF_STY2.MSK QF_STY3.BMP QF_STY3.MSK QF_STY4.BMP QF_STY4.MSK QF_STY5.BMP QF_STY5.MSK PICTBTNS.BMP QF_STY3N.BMP TEXTBTNS.BMP BWBOXED.BMP BWCHISEL.BMP BWEMBOSS.BMP BWPICBTN.BMP BWQF_FLD.BMP BWSHADOW.BMP BWSTNDRD.BMP BWTXTBTN.BMP QFORM\WZ_DSCRN.PRG WZ_DSCRN.FXP WZ_S1DOS.SCX WZ_S1DOS.SCT WZ_S2DOS.SCX WZ_S2DOS.SCT WIZQFRMD.DBF WIZQFRMD.FPT WZ_S3DOS.SCX WZ_S3DOS.SCT QFORM\WIZ_EDIT.PRG WIZ_EDIT.FXP QFORM\WIZ_EDIT.SPR WIZ_EDIT.SPX WIZARD\WIZ_PIC.SPR WIZ_PIC.SPX